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Preface 



This publication provides IBM customer 
engineers and other technical personnel 
with a description of the internal logic 
and organization of the IBM System/360 
Operating System Time sharing Option EDIT 
Command Processor. 



System.. Programmerls„Guide (GC28-6550) 
contains a description of the ABEND work 
area. 



The publication IBM. Syste m/36 Operating 

System: Time, Sharing Option^ Terminal 

Mpnitor m Program and Service Routines 
Program Logic Manual (GY28-6770) contains 
prereguisite information. Co-reguisite 
publications are: 

JBM .System/360 Operating System: Time 

Sharin g ^ Option : 

Command Language Reference (GC28-6732) 
explains the use of TSO commands. 

Command Processor Program Logic Manual 
Volume" (GY28-6774) describes the~ 
internal logic of the TSO HELP command. 

Command Processor., Program Logic Manual 
Volume 6~ (GY28-6776) describes the 
internal logic of the TSO PROFILE and 
RUN commands. 

The following co-reguisite publications are 
only reguired if the installation has TSO 
Data Utilities Program Product 5734-UT1: 

TSO Data Utilities Copy , Format, List, 
^£S^IiserJ^s^uide_and_Reference_Manual 
(SC28-6765)"" (Program Product 
publication) explains the use of the TSO 
FORMAT and MERGE commands. 

TSQ_pata m ytilitjes Copy , Format f List f 
Merge Program, Logic Manual (LY28-6766) 
(Licensed Program Product publication) 
describes the internal logic of the TSO 
FORMAT and MERGE commands. 

Specific additional information is 
available in: 

IBM, System/360 Operating, System : 

Supervisor Services, and, Macro 
Instructions (GC26-6646) describes 
linkage conventions for subtasks. 



This manual comprises the following 
seven sections: 



Section 1 : Introduction - a discussion of 
the purpose and function of the EDIT 
Command Processor. 



Section 2: Method of Operation - a 
functionally oriented description of the 
way in which the EDIT Command Processor 
handles the EDIT command and subcommands 
and error conditions. Method of operation 
diagrams are on foldout pages at the back 
of the manual. 



Section 3: Program Organization - a 
description of specific program components 
(modules and Csects) and flowcharts. 



Section 4: Directory - tabular aids for 
the reader to find sections of code in the 
microfiche and lists of assembly modules 
and control sections. 

Section 5: Data Areas - detailed 
descriptions of the various tables , work 
areas, and parameter lists used by the EDIT 
Command Processor. 

Section 6: Diagnostic Aids - a compilation 
of information designed to facilitate 
diagnosis of EDIT program errors. 

Section 7: Appendix — formats of the EDIT 
command and subcommands. 

Glossary: A compilation of terms unigue to 
TSO and to the EDIT Command Processor. 

More detailed information about the EDIT 
Command Processor may be found in the 
associated microfiche listing. 
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Section 1: Introduction 



The EDIT Command Processor program is a part of the Time Sharing Option 
(TSO) of the MVT configuration of the control program. The EDIT Command 
Processor program (hereinafter called the EDIT program) performs the 
functions of the EDIT command and subcommands. Formats of the EDIT 
command and subcommands and acceptable operands are discussed in Section 
7. 



The TSO Environment 

To better understand the environment in which the EDIT Command Processor 
operates, we should review the operations required before the EDIT 
program can be used. There are three primary operations that must be 
performed: 

1 . The console operator must issue a START TS command to prepare the 
entire system for the operation of TSO, 

2. The terminal user must issue a LOGON command to notify the system 
that he is going to use TSO, and to define some of the system 
resources that he will need. 

3. The terminal user must issue the EDIT command to initiate EDIT 
processing. 

Figure 1 is a general diagram showing the routines that perform these 
operations. 
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MVT Control Program 



START . 



(See Figure 2 
For Description of 
Main Storage) 



T 

ATTACH 

A 



One Per System 



One Per Foreground Region 



Time Sharing 
Control Task 



LOGON 



(See Figure 3 
For Description of 
Main Storage) 




One Per User 



One Per User 



LOGON/ 

LOGOFF 

Scheduler 



ATTACH 



Terminal 
Monitor 
Program 



EDIT 



(See Figure 4 
For Description of 
Main Storage) 



> 



One Per Command 



ATTACH 

1 



EDIT 

Command 

Processor 



Figure 1. Relationship of TSO Commands to TSO Processing 

STARTING TSO 

The console operator enables the computing system to perform TSO 
processing by issuing the START TS command. The MVT control program, in 
processing this command attaches the Time Sharing Control (TSC) Task, 
The TSC initialization routine obtains a TSC region and in it, builds 
the control blocks and buffers that TSO will need. The TSC task 
attaches a Region Control Task (RCT) for each foreground region that was 
specified in a cataloged procedure named in the START TS command, and 
the regions for each RCT are assigned. 

The routines of each RCT control the TSO jobs that, operate from its 
region. This control consists primarily of the swapping of jobs in and 
out of the region when several jobs are competing for space in that 
region. The RCT routines operate from the TSC region, not from the 
region that they control. After the RCTs are attached, the system is 
ready to perform TSO processing. Main storage, in general, is as shown 
in Figure 2. 



14 EDIT 



TSO Command Processor PLM - Vol. 3 (Release 21) 



. Link Pack Area 



Dynamic Area -c 



• TCAM 

• Message Control Program 

• Buffers 




Time Sharing Control Region 

• TSC Routines 

• RCT Routines 

• Control Blocks and Buffers 

• TSO Driver 

• Extended Link Pack Area 



• Foreground Regions 



Local System Queue Area 



Background Regions 




• System Queue Area 



• MVT Nucleus 




. TSO and TCAM Regions 
(See Figure 3) 



Figure 2. Main Storage after TSO has Been Started 



LOGGING ON 

After TSO has been "started" , a terminal user obtains access to its 
facilities by logging his terminal onto the system via the LOGON 
command. This is the start of his terminal, ses sio n in which he may use 
the TSO command language to perform his data processing from that 
terminal. (The session ends when a LOGOFF or another LOGON command is 
issued from that terminal.) 

In processing the LOGON command, the TSC routines assign this session 
to one of the RCTs. The LOGON/LOGOFF scheduler is invoked by and loaded 
into the region of that RCT. All processing for this session will occur 
in this region. The LOGON routines validate the user's password, 
identify his User Attribute Data Set, and read in the user's profile. 
The LOGON routine causes the Terminal Monitor Program (TMP) to be 
attached by constructing JCL statements from information in the LOGON 
commands and previously-defined catalogue procedures. The JCL defines 
the TMP as a job step and the MVT initiator attaches it. The TMP is 
brought into the foreground region assigned to this session. 
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The TMP processes information specified in the JCL statements, issues 
a READY message to the terminal and looks for input by invoking the 
PUTGST service routine. Since at this point , no input (other than 
LOGON) has yet been entered during this session, the PUTGET routine will 
find nothing and issue a WAIT macro instruction. Figure 3 shows a 
typical configuration of the TSO portion of main storage after a user 
has been logged on. 



TSO and TCAM Regions 
(See Figure 2) ^ 



• TCAM 

j • Message Control Program 

• Buffers 




Foreground Regions Unasslgned 
| or Assigned to Other Users 




TSO User's Region 
(See Figure 4) 



Figure 3. Section of Main Storage after a TSO User has been Logged On 

PROCESSING TSO COMMANDS 

When a user enters something from his terminal, it is stored in a buffer 
that is related to his session's TMP. The GETLINE service routine moves 
this line of input to a TMP buffer and returns control to the TMP. 

Terminal Monitor Program 

The TMP controls processing during a session; it: 

• Requests commands from the terminal when a session is started or 
when a previously entered command has been processed. 
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• Has the command checked for validity. 

• Invokes the command processor for that command. 

• Receives control after a command processor has completed. 

• Controls processing when a command processor is terminated because 
of an error. 

• Processes attention interruptions. 

• Initiates LOGOFF processing caused when an operator issues a STOP TS 
command during a session. 

When the PUTGET routine returns a line of input, the TMP invokes the 
Command Scan service routine to see if this input is a syntactically 
valid TSO command. If it is not a command, the TMP causes a message to 
be issued to the terminal and waits for more input. If the input is a 
valid command, the TMP attaches the appropriate command processors. 

When a command processor completes or is terminated by an error, CPU 
control is returned to the TMP. A more detailed description of the 
operation of the TMP can be found in the publication, IBM, System/360 

2Efl£atin£_Sxstemj. Time _ Sharing _ Opt ion. Terminal,. Monitor^ Program and 

Service_Routines_Pr^ 



TSO SERVICE ROUTINES 

There are seven service routines used during TSO processing. They 
are normally invoked by the TMP, command processors, and each other. 
They can be invoked by any processing program. The service routines 
are: 

• GETLINE - obtains a line of input from an area defined as its source 
of input. Normally this area contains input from the terminal. 

• PUTLINE - sends a line of output to the terminal. 

• PUTGET - sends a line of output to the terminal, and waits for a 
line of input as response. 

• STACK - places pointers to lines of input into areas (stacks) from 
which the GETLINE and PUTGET routine obtain data. 

• Command Scan - checks the syntax of an input buffer to see if it 
contains a valid TSO command name. 

• PARSE - checks syntax of parameters of TSO commands. 

• Dynamic Allocation Interface Routine (DAIR) - provides information 
to the MVT dynamic allocation routines which allocate, free and 
concatenate data sets that relate to a session. 

The operation of these service routines is also found in the Terminal 
Monitor Program^ and Service Routines.. Program_Logic_ Manual. 
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The EDIT Command Processor 

The EDIT program resides on SYS1.CMDLIB until it is invoked by the user. 
When the user enters the EDIT command and operands ( see Section 7 for 
external specifications of the EDIT command) a copy of the EDIT proaram 
is loaded into the user's region. The Edit data set may be a new data 
set or an old existing Edit data set; in either case, the name of the 
data set is that specified on the EDIT command. 

The EDIT command enables a TSO user to create data sets and to modify 
them by adding, replacing, and deleting records within the data sets. A 
data set can consist of only printable characters in EBCDIC 
representation. It can contain text or programming language source 
statements. The user performs work on his data set thru either the 
Input„mode or the Edit^mode. 

In Input mode the user enters successive lines of data. One line of 
input becomes one record in the data set. Services available in the 
Input mode include translation of tabulation characters to blanks, 
interpretation of character and line delete characters, and translation 
of lower-case characters to upper case. Programming language syntax 
checkers can be requested to process source statements as they are 
entered. 

In Edit mode the user enters subcommands to point to particular 
records of the data set, to modify or renumber records, to add and 
delete records, to control editing of input, or to compile and execute a 
program. While in the Edit mode, the EDIT program keeps track of the 
user's position in the data set by means of the current^line pointer. 
Subcommands are provided to enable the user to move the current line 
pointer within his data set. Once the current line pointer is 
positioned at a particular record, the user can then request a 
particular function be performed by issuing the appropriate subcommand. 
Following is a list of the EDIT subcommands and their associated 
functions: 

BOTTOM 

moves the line pointer to the last line of the data set. 

CHANGE 

modifies record text. 

DELETE 

removes records from the data set . 

DOWN 

moves the line pointer toward the end of the data set. 

END 

terminates the EDIT command. 

FIND 

locates a character string. 

FORMAT 

prints out a data set or a portion of a data set in a particular 
format. Requires IBM COPY, FORMAT, LIST, MERGE Program Product. 

HELP 

explains use of EDIT subcommands. 

INPUT 

accepts new lines of data from the terminal. 
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INSERT 

inserts records into the data set. 

Insert /Replace/Delete 

inserts, replaces, or deletes a line of data. 

LIST 

prints out specific lines of data or the entire data set. 

MERGE 

merges data sets or parts of data sets into the Edit utility data set. 
Requires IBM COPY, FORMAT, LIST, MERGE Program Product. 

PROFILE 

specifies 'delete 1 characters. 

RENUM 

numbers or renumbers lines of data. 

RUN 

compiles, loads, and executes the data set. 

SAVE 

retains data sets. 

SCAN 

controls syntax checking. 

TABSET 

sets the tab positions for editing. 



TOP 

moves tl: 

iter moves in front of the first line of the data set, 



I moves the line pointer to line zero, if line zero exists, otherwise 
the point 



UP 

moves the line pointer toward the beginning of the data set. 

VERIFY 

displays the line referred to by the current line pointer after 
modification by a subcommand or after movement of the current line 
pointer. 

Main storage after a TSO user has entered an EDIT subcommand is 
depicted in Figure 4. 
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TSO User's Region 
(See Figure 3) "^ 




> EDIT Command Processor 



Figure 4. Section of Main Storage After a TSO User has Entered an EDIT 
subcommand 
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Section 2: Method of Operation 



This section describes the method of operation of the EDIT program; it 
is divided into six major areas, each of which describes a functional 
group of routines. These major areas are: 

• Initialization Routine 

• Controller Routine 

• Error and Attention Exit Routines 

• EDIT Service Routines 

• EDIT Subcommand Processors 

• EDIT Access Method Routines 

Each area contains functional descriptions, and, where applicable, 
summary of operation tables, and method of operation diagrams. The 
method of operation diagrams are on foldout pages at the back of the 
manual. Figure 5 explains the meaning of the symbols used in these 
diagrams. 

SYMBOL MEANING 

Initial entry point 



I \ Data flow 



Control flow 



Pointer 



^ Data reference 

Figure 5. Symbols Used in Method of Operation Diagrams 

INPUT PROCESSED BY THE EDIT PROGRAM 

The input processed by the EDIT program consists of: 

• The EDIT command operands - processed by the initialization routine. 

• EDIT subcommands and operands - processed by the controller routine 
and the subcommand processors. 

• Data - processed by the subcommand processors, the service routines, 
the EDIT Access Method, and Language Processors. 

EDIT subcommands are entered during the Edit mode of operation. 
During Edit mode, the controller routine treats any input as a possible 
subcommand. Data may be entered during the Input mode of operation. 
The INPUT subcommand processor handles incoming data. The operating 
mode of EDIT is switched from Edit to Input when: 
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• A null line is entered. 

• The INPUT subcommand is entered. 

• The INSERT subcommand is entered with no operands. 

The operating mode of EDIT is switched from Input to Edit when: 

• A null line is entered. 

• An attention interrupt is entered. 

• A syntactically incorrect line is entered while syntax checking is 
in effect. 

• An exceptional condition occurs during input processing. 

The EDIT program assigns a unique key (a binary number) to each input 
line and treats the key and the data as a record. All accessing of 
records in the EDIT program is done by record key. If the user has 
specified that his data set be line-numbered, the EDIT program generates 
for each new record a line number which is the printable equivalent of 
the record's key, and if the user specifies unnumbered, the records will 
contain only a key and data. When a record is displayed, only the data 
and the line number, if present, will be printed. 

The EDIT program converts the format of each record from old QSAM 
data sets into EDIT Access Method format. Figure 6 shows these two 
record formats. 



QSAM Data Set 



EDIT Access Method 



( Fixed Numbered 



DATA 


NUMBER 



ered ) 










KEY 


LL 


00 


DATA 


NUMBER 



bered ) 








KEY 


LL 


00 


DATA 



( Variable Numbered ) 



LL 


00 


NUMBER 


DATA 



KEY 


LL 


00 


NUMBER 


DATA 



( Variable Unnumbered ) 



LL 


00 


DATA 



KEY 


LL 


00 


DATA 



Field 
KEY 

LL 



00 
NUMBER 



DATA 



Length 
4 



2 
T-8 



variable 



Contents 

- Key value of record in binary. 

- Length of record; this includes length field, the DATA field, 
and NUMBER field, if present. 

The length value is contained in the first two bytes of this field. 

- Binary zeros. 

- Sequence or line number of record; this is the first eight bytes if 
the record is variable - length and the last eight bytes if the record 
is fixed - length . 

Exceptions: 

COBOL — First six bytes. 

ASM — Variable length within last eight bytes. 

- User's information; length is dependent on the Edit data set type 
and user definition of record length. 



Figure 6. QSAM and EDIT Access Method Record Formats 

Most EDIT subcommands refer to or manipulate a record or a portion of 
a record as part of their operation. Table 1 lists the EDIT subcommands 
and indicates which portion of a record they refer to or manipulate 
during their operation. 
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Table 1, 
r 



EDIT Subcommand Functions (Part 1 of 2) 



T 1 

Line number 



| Subcommand! 
h 



h 



Key 



Record 



h 



BOTTOM 



Reads last record in data 
set; sets current line 
pointer to key of last 
record. 



NA 



NA 



CHANGE 



Reads records by key 
until record to be changed 
is located; creates new 
keys for overflow lines 
(TEXT NONUM) ; sets current 
line pointer to key of 
last record changed. 



Modifies data with 
in a record; 
creates new record 
to contain overflow 
lines. 



NA 



DELETE 



h 



Uses key to find record or 
records to be deleted; 
sets current line pointer 
to key of record preceding 
deleted records, or to 
zero if first record is 
deleted. 



Deletes record. 



NA 



DOWN 



Reads records sequentially 
by key (toward end of data 
set) until the specified 
number has been read; sets 
current line pointer to 
key of last record read. 



NA 



NA 



-+ 



FIND 



h 



Reads records until record 
is found which contains 
specified character 
string; sets current line 
pointer to key of record 
containing character 
string. 



Searches record for 
a particular 
character string. 



NA 



FORMAT 



h 



Reads records by key to 
locate records selected 
for formatting. 



Writes records into 
Format data set. 



NA 



HELP 



NA 



NA 



NA 



INPUT 



h 



Reads records by key to 
determine range of keys 
available for creation of 
new records; uses keys to 
create, replace and delete 
records; sets current line 
pointer to last record 
written into data set. 



Writes new records 
into data set; 
deletes old 
records. 



Creates 
new line 
numbers. 



-4 



INSERT 



Uses key to locate line of 
the data set after which a 
record is to be written; 
reads key of record to 
determine end of available 
space in data set for new 
records; sets current line 
pointer to last record 
written into data set. 



Writes new record 
into data set. 



Creates 
new line 
number. 
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Table 1, 
i 



EDIT Subcomc 

"i 



and Functions (Part 2 of 2) 

1 



T 1 

Line number | 



I Subcommand 



h 



Key 



Record 



Insert/ 

Replace/ 

Delete 



Uses key t 
into which 
be written 
a record i 
sets curre 
to key of 
or to key 
preceding 
or to zero 
record is 



o lo 
a r 
or 
s to 
nt 1 
reco 
of r 
reco 

if 
dele 



cate 
ecor 

fro 

be 
me 
rd w 
ecor 
rd d 
the 
ted 



line 
d is to 
m which 
deleted; 
pointer 
ritten 
d 

eleted, 
first 



Writes new record 
into data set; 
deletes old record. 



Creates 
new line 
number. 



f- 



LIST 



h 



Uses 
recor 
writt 
sets 
to la 



key t 
ds or 
en to 
curre 
st re 



o find t 

records 

the ter 

nt line 

cord wri 



he 
to 

min 
poi 
tte 



be 
al; 
nter 
n . 



Reads records from 
the data set; 
writes them to the 
terminal. 



Writes out 
line numbers 
to the 
terminal. 



H 



MERGE 



Uses 

recor 

mergi 

line 

recor 



keys 
ds se 
ng; s 
point 
d in 



to locat 
lected f 
ets curr 
er to la 
data set 



e 

or 
ent 
st 



Writes records into 
Merge data set. 



Changes line 
numbers . 



PROFILE 



NA 



NA 



NA 



H 



RENUM 



Uses key to locate records 
which are to have new line 
numbers; changes record 
keys to conform to new 
line numbers. 



Writes entire data 
set with renumbered 
keys to second data 
set. 



Changes or 
creates line 
numbers as 
specified . 



H 



RUN 



Uses keys to locate all 
records of the data set. 



Writes records into 
the Run data set. 



NA 



SAVE 



Uses keys to locate all 
records of the data set. 



Writes records into 
the Save data set. 



NA 



SCAN 



Uses keys to locate 
specified records of the 
data set; sets current 
line pointer to last 
record scanned. 



Reads records into 
storage. 



NA 



TABSET 



H 



NA 



NA 



NA 



TOP 



Reads first record in data 
set; sets current line 
pointer to zero. 



NA 



NA 



f- 



UP 



Reads keys of records 
(toward beginning of data 
set) until the specified 
number has been read; sets 
current line pointer to 
key of last record found. 

|NA 

j 



NA 



| NA 



INA 
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THE CURRENT LINE POINTER 

The current line pointer is a device which enables the user and the EDIT 
program to refer to a particular record in the data set. The current 
line pointer (a field in the EDIT Communication Area) contains a value 
which is equal to the value of a particular key. The record associated 
with this key is the current line, or current record. Many subcommands 
make use of the current line pointer during their operation. Table 2 
lists the EDIT subcommands and indicates which subcommands manipulate 
the current line pointer. 

Table 2. Position of Current Line Pointer After Subcommand Operation 



I 



Subcommand 



| Current Line Pointer Position 



h 



BOTTOM 



Last line of data set or zero if data set is 
empty. 



CHANGE 



Last line changed. 



DELETE 



Line preceding deleted line, if any, or else, 
zero . 



h 



DOWN 



Last line referred to. 



h 



END 



No change. 



FIND 



h 



Line containing character sequence, 
if any, or else, no change. 



FORMAT 



h 



No change. 



■H 



HELP 



No change. 



INPUT 



Last line entered. 



INSERT 



Last line entered. 



f- 



Line Insert/Replace/ 
Delete 



Line inserted or replaced, or line preceding line 
deleted, if any, or else, zero. 



f- 



LIST 



Last line listed, 



MERGE 



Last line of data set. 



h- 



PROFILE 



h 



No change. 



RENUM 



Same relative record, 



RUN 



No change. 



SAVE 



h 



No change. 



SCAN 



Last line scanned, if any, 



TABSET 



h 



No change. 



TOP 



Zero. 



UP 



Last line referred to. 



VERIFY 



| No change. 
-j 
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OUTPUT CREATED BY EDIT PROGRAM 

During the operation of EDIT, the user can create a new data set or 
modify an existing one. The utility data set is a work file used by the 
EDIT program (specifically , the EDIT Access Method) during EDIT 
operation. New records entered by the user are inserted into this data 
set; existing records are modified in this data set. The records in the 
utility data set are in EDIT Access Method format. The Edit data set, 
which is the data set the user specified when he entered the EDIT 
command, is QSAM-f ormatted. It contains records which have been 
modified or added during a previous EDIT session. The EDIT program 
transfers records from the Edit data set into the utility data set 
(changing their formats during the transferral) when the EDIT session 
begins. When the user enters the SAVE subcommand, the modified records 
in the utility data set are transferred into the Edit data set, or 
another user-specified data set, thus creating an updated Edit data set. 

Other data sets created during EDIT operation are: 

• The Save data set - created when the user specifies that the results 
of his EDIT session are to be retained in a data set different from 
the Edit data set. 

• The Run data set - created for execution of the user's data set. 

• The Merge data set - created for the MERGE Program Product. 

• The Format data set - created for operation of the FORMAT Program 
Product. 

• The Renum data set - created to contain the renumbered records after 
a RENUM subcommand operation; replaces the utility data set. 

• The reverse Polish-notated data set - an in-storage data set created 
when the data set type is either BASIC or IPLI; created by the BASIC 
and IPLI language processor. 

The EDIT program displays the following types of messages: 

• Mode messages - indicate either Input or Edit mode of operation. 

• Informational messages (first- and second-level) - inform the user 
of conditions within the EDIT program; second-level messages, which 
contain more detailed information, are displayed when the user 
enters a "?". 

• Verify messages - display the current record if the value of the 
current line pointer has changed or the text of the record has been 
modified during operation of an EDIT subcommand processor. 

Other messages displayed during EDIT program operation are: 

• Prompting messages - displayed by the EDIT program or by the PARSE 
service routine to request more information from the user. 

• Syntax checker messages - displayed by the EDIT program or by a 
syntax checker to inform the user of an error found in a source 
statement. 

• Terminal error messages - displayed by the EDIT abnormal end exit 
routine or the TMP after an abnormal termination (ABEND) of the 
EDIT program. 
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TERMINATION OR SUSPENSION OF EDIT PROGRAM OPERATION 

The operation of the EDIT program or of a portion of the program (a 
subcommand processor , for instance) is suspended or terminated in 
accordance with what the user has specified or with conditions within 
the EDIT program. 

Termination of an EDIT subcommand processor does not necessarily 
require the termination of the entire EDIT program. If the termination 
is normal, the controller regains control and awaits the entry of 
another subcommand by the user. (See the discussions for each 
subcommand processor for further information about normal termination of 
subcommand processors.) Error termination of a subcommand processor 
does not require termination of the EDIT program if the source of the 
subcommand was the terminal. The source of input to the EDIT program, 
however, can be an in-storage command list, or command procedure. A 
command procedure is a sequence of TSO commands, subcommands, and data. 
Usually it is stored in a data set that has been created by means of the 
EDIT command with the CLIST data set descriptive qualifier. If the 
subcommand which is terminating due to error is from a command 
procedure, the entire operation of the EDIT program is terminated. 

The CAINPROC field of the EDIT Communication Area (IKJEBECA) records 
the source of current input to the EDIT program. If the setting of 
CAINPROC is B'O 1 , the terminal is the current source of input; if the 
setting is BM 1 , a command list is the current source of input. The 
EDIT controller updates this field after every return from the PUTGET 
Service Routine as follows: 

• for a return code of from PUTGET, CAINPROC is set to B 1 *) 1 , 

• for a return code of 4 from PUTGET, CAINPROC is set to BM', 

Su spension_of_ EDI T^Prggr am Operation 

When the user causes an attention interruption by striking the ATTN key, 
the operation of the EDIT program is suspended and the terminal input 
queue is cleared (with the TCLEARQ macro instruction) . EDIT operation 
continues according to what the user enters next. See the topic, 
"Attention Exit Routine" for a more detailed description of attention 
interruption handling. 

NQ£Ml-TeOlnation_of_EDIT Program_Operation 

The EDIT program is terminated normally when the user enters the END 
subcommand. The operation of the EDIT program is terminated as follows: 

• The source of current input to the EDIT program is determined. 

• If the current source is the terminal, the user is reminded to save 
his data set, the terminal input queue is cleared (with the TCLEARQ 
macro instruction) , the input stack is flushed (via the STACK 
Service Routine) , and control is returned to the Terminal Monitor 
Program with a return code of zero. 

• If the current source of input is an in-storage command list, the 
terminal input queue is cleared, the input stack is flushed, and 
control is returned to the Terminal Monitor Program with a return 
code of zero; the user is unable to save his data set. 

See the topic, "END Subcommand Processing" for a more detailed 
description of normal termination. 
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Error,, Termination^ of ..EDIT, Program,, Operation 

When the initialization routine of EDIT terminates due to error, or when 
a critical command system error or utility I/O error is encountered, the 
EDIT program is terminated as follows: 

• The terminal input queue is cleared (with the TCLEARQ macro 
instruction) . 

• The input stack is flushed (via the STACK Service Routine) . 

• The END subcommand processor is invoked to free resources obtained 
by the EDIT program. 

• Control is returned to the Terminal Monitor program with a return 
code of 12. 

When an EDIT subcommand processor terminates due to error, and the 
current source of input is an in-storage command procedure, the EDIT 
program is terminated as described above. 

If the current source of input is the terminal, only the input queue 
is cleared and EDIT processing continues. (Until the first EDIT 
subcommand is obtained via the PDTGET Service Routine, terminal input is 
assumed.) 
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SYNTAX CHECKING 

Syntax checking of FORTRAN (E, G, G1, H) , IPLI, BASIC, GOFORT, PL/I and 
PL/I (F) source statements is available while in EDIT program operation. 
The user can request that each line he enters from the terminal in Input 
mode be immediately scanned for syntax errors by specifying SCAN on the 
EDIT command or ON on the SCAN subcommand. Before the record is scanned 
it is put into the user's data set. If a syntax error is found in a 
record just entered by the user, an error message is displayed and EDIT 
switches from Input to Edit mode to enable the user to correct the 
mistake. 

Lines entered by the user which end in a hyphen are not immediately 
scanned by the syntax checker; they are transferred to the utility data 
set as entered. If the user's data set type is GOFORT (FREE) , the 
hyphen remains as data. The hyphen is removed for all other data set 
types. 

By specifying the SCAN subcommand with no operands or with line 
number operands, the user requests that his existing data set be either 
entirely scanned or partially scanned for syntax errors. Figure 7 
describes the formats of records passed to the syntax checkers. 



Data 



Line Number 



-Data 



■ Line Number 




t 



8 Byte 



8 Bytes 



- Record- 



J 



xed - Length 
Numbered ) 



Record Length 



Line Numbei 



- Record 



Line Number 




Variable - Length 
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Figure 7. Formats of Records Passed to Syntax Checkers 

The syntax checkers operate as separate components of TSO. They 
perform single-statement syntax checking as opposed to inter-statement 
checking; that is, a statement is considered valid if it satisfies its 
category definitions irrespective of preceding statements which may 
impose restrictions on the statement composition. 



5§g-Qf „ IPLX_and_B ASIC Syntax^ Checkers 



The syntax checkers are not only used to scan source state 
proper syntax. If the user's data set type is IPLI or BAS 
checker or LANGPRCR (the syntax checkers available while i 
operation) is also used to delete, to add and to update re 
reverse Polish-notated data set. This data set is require 
execution under IPLI or BASIC and is maintained along with 
utility data set as the user performs editing operations, 
reverse Polish-notated data set must be constantly updated 
in storage; the syntax checker which maintains the data se 
into storage regardless of whether syntax checking is requ 
user. The syntax checker is also used when the data set i 
the RUN subcommand. 



ments for 
IC, the syntax 
n EDIT 
cords in a 
d for 

the EDIT 

Since the 
, it is kept 
t is loaded 
ested by the 
s executed via 
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To summarize, syntax checkers are invoked by EDIT to scan source 
statements, to delete, add, and update records from the reverse 
Polish-notated data set, and to enable program execution of BASIC or 
IPLI data sets. Statements can be scanned one at a time or several at i 
time. 

The syntax checkers (LANGPRCR) available while in EDIT operation are: 

• PLISCAN (for PL/I) . 

• PLIFSCAN (for PL/IF) . 

• IPDSNEXC (for FORT E, G, GI, H, and GOFORT) . 

• IKJNC211 (for BASIC and PL/IF). 



The modules of EDIT which invoke syntax checkers are: 



IKJEBESC — SCAN subcommand 

IKJEBESN — SCAN subcommand 

IKJEBECG — CHANGE subcommand 

IKJEBECN — CHANGE subcommand 

IKJEBEIM — INPUT subcommand 

IKJEBEIS — INSERT subcommand 

IKJEBELI — Insert/Replace/Delete implicit subcommand 

IKJEBERU — RUN subcommand 

IKJEBEDE — DELETE subcommand 

IKJEBEMR — Translation service routine 



A standard interface (shown in Figure 8) is provided to enable the 
EDIT modules to invoke any available syntax checker. Figure 9 shows an 

I expansion of this interface. Detailed information on syntax checker 
control blocks is given in Section 5: Data Areas. 
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Figure 8. Interface Between EDIT Program and Syntax Checkers 
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User Exit Routine 

If a user exit routine has been supplied at system generation time for 
a particular user data set type, the user may enter subfield information 
with this data set type keyword. This subfield information may contain 
any alphameric data defined as valid, not exceeding 256 characters in 
length and not containing any blanks, tabulation characters, or commas. 
This information is passed to the user exit routine to be interpreted 
and encoded into bytes and 1 of the Option Word in the standard syntax 
checker interface parameter list. 

The user exit routine is passed the address of a three word parameter 
list in register 1. The contents of this parameter list is as follows: 

Word 1 Address of the subfield parameter descriptor element (PDE) 
returned to the initialization routine by IKJPARS. 

Address of bytes and 1 of the syntax checker Option Word. 

Address of command processor parameter list passed to the EDIT 
Command Processor. This information is used to access the ECT 
and UPT, if the exit routine wants to use IKJPARS or any of 
the TMP Service Routines. 

(See also Table 63) . 

Syntax checkers can be invoked by several EDIT modules to perform 
several different functions. Table 3 summarizes the usage of the syntax 
checkers. 

Table 3. Syntax Checker Usage 



Word 2 
Word 3 



|EDIT Module 



| Function Performed 



ISCAN 



H 



Loads syntax checker for initialization. 



ISCAN 



h 



Deletes syntax checker for termination, 



ISCAN 



Passes records from the utility data set for initial 
translation into reverse Polish notation. 



ISCAN 
I 



| 

ISCAN 
I 



Passes records from the utility data set for syntax 
checking . 



I 

ICHANGE 
| | (ITF only) 



Passes single record from utility data set for syntax 
checking . 



| INPUT 

I 

| 



Passes single record to be scanned and/or translated 
and added to reverse Polish-notated data set. 



Passes single record to be scanned and/or translated 
and added to reverse Polish-notated data set. 



| INSERT 
| | (ITF only) 



h 



Passes single record to be scanned and/or translated 
and added to reverse Polish-notated data set. 



| Insert/Replace/ 
IDelete 
| | (ITF only) 



Passes single record to be added or deleted fron 
reverse Polish-notated data set. 



(Translation 
I | (ITF only) 
l 
I 



After successful renumber or merge operation , deletes 
old Polish-notated data set and passes records to be 
translated and inserted into reverse Polish-notated 
data set. 



|RUN (ITF only) 
| 



Passes pointer to RUN command. 



IDELETE 
| | (ITF only) 



Passes control to delete records from reverse 
Polish-notated data set. 
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Figure 9. Expansion of Syntax Checker Interface 
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Initialization 

The initialization routine (IKJEBEIN) receives control from the Terminal 
Monitor Program (IKJEFT02) whenever a valid EDIT command is issued. The 
initialization routine acquires and initializes work areas used by the 
EDIT program/ processes the operands and keywords specified with the 
EDIT command/ and passes control to the EDIT controller for subsequent 
subcommand processing. 

| Prior to validating the command operands and data set attributes 
specified by the user, the initialization routine: 

• Obtains the EDIT Communication Area (IKJEBECA) . 

• Loads the resident message selection routine (IKJEBEMS) . 

• Invokes TSO service routine (IKJPARS) to check syntax of EDIT 
command. 

• Performs data set name processing/ and updates the EDIT 
Communication Area. 

• Acquires data set type information for inclusion in the EDIT 
Communication Area. (This information is based on data set type, if 
entered; if data set type is not entered it is obtained from the 
descriptive qualifier.) 

• Performs NEW/OLD keyword processing/ if the data set is specified/ 
or assumed/ to be OLD. 

• Invokes TSO service routine (IKJDAIR) to dynamically allocate a data 
set specified by user, if data set is OLD. 

After operands have been checked/ the initialization routine: 

• Initializes the EDIT Access Method (hereafter called the Access 
Method) by invoking the Access Method initialization routine 
(IKJEBEUI) / if the data set is either new or old and empty, or if a 
member is to be created for a partitioned data set. 

• Loads the Access Method Interface routine (IKJEBEUT) and invokes the 
initial copy service routine (IKJEBECO) to copy the Edit data set or 
member into a utility data set, if the data set or member specified 
by the user contains records. 

• Invokes the Controller routine (IKJEBEMA) via the XCTL macro 
instruction. 

NOTE: When the controller routine is invoked, the CAEDMEM flag (for 
Partitioned data sets) and the CAEDDISP flag (for sequential data 
sets) in the EDIT Communication Area (IKJEBECA) will indicate 
whether Input mode or Edit mode should be established. If the data 
set specified on the EDIT command is either new or old and empty or 
if the specified member does not exist, the initialization routine 
indicates that the Input mode should be entered by setting CAEDMEM 
or CAEDDISP to 0. If the data set is old and not empty or if the 
specified member exists/ CAEDMEM or CAEDDISP is set to 1, indicating 
that Edit mode is to be entered. 

P£Qcessing_EDIT_Qperands 

This topic describes the way in which the initialization routine handles 
particular operands and keywords. Table 5, which follows this topic, 
summarizes the operations of the initialization routine. 
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Data, Set, Naj.e_Ogerand 



I 



User Specification 



Action of Initialization Routine 



h 



User entered fully-qualified data 
set name and data set type, 
(EDIT 1 engb w.parts.dat a 1 . . .ASM) 



The fully-qualified data set name 
and the data set type are indicated 
in the EDIT Communication Area, 
(See Obtaining Processor Dependent 
Information,) 



User entered fully-qualified data 
set name and no data set type 
(EDIT 1 engbw. parts. data' ) 



The user is prompted thru IKJPARS 
to supply the data set type. When 
this information is provided, the 
fully-qualified data set name and 
the data set type are indicated in 
the EDIT Communication Area. 



h 



User entered a partially-qualified 
data set name and the data set 
type, (EDIT parts... ASM) 



The data set name is fully- 
qualified thru IKJDFLT and 
indicated with the data set type in 
the EDIT Communication Area. 



h 



H 



User entered a partially-qualified 
data set name (rightmost qualifier 
is not a data set descriptive 
qualifier) and no data set type, 
(EDIT engbw. parts. nov. .. .) 



The user is prompt 
to supply the data 
data set name is f 
thru IKJDFLT. The 
data set name and 
are indicated in t 
Communication Area 



ed thru IKJPARS 

set type. The 
ully-qualified 
fully- qualified 
the data set type 
he EDIT 



H 



User entered a partially-qualified 
data set name (rightmost qualifier 
is a data set descriptive 
qualifier) and no data set type, 
(EDIT parts. data ) 



The data set name 
qualified thru IKJ 
qualified data set 
data set type are 
EDIT Communication 



is fully- 

DFLT. The fully- 

name and the 
indicated in the 

Area. 



NEW/OLD Keyword 



I 



User Specification 



Action of Initialization Routine 



User entered NEW on the EDIT 
command, (EDIT 1 engbw. parts. data 1 
new. . .) 



EDIT assumes a new data set; 
IKJEBEIN does not allocate new data 
sets of the name specified by the 
user; the allocation of data set 
'engbw. parts. data 1 is deferred 
until the user enters the SAVE 
subcommand. 



-4 



User entered OLD or neither OLD 
nor NEW on the EDIT command; 
user specified no member name, 
(EDIT'engbw. parts. data 1 . . .) 



Indicates old sequential data set 
in the Communication Area; invokes 
IKJDAIR to allocate a data set as 
OLD, KEEP, KEEP. 



User entered OLD or neither OLD 
nor NEW on the EDIT command; 
user specified a member name, 
(EDIT 'engbw. parts. data 1 
(memname)old ...) 



Processes Membername (See Table 4) ; 
indicates old data set in the 
communication area; invokes IKJDAIR 
to allocate a data set as SHR,KEEP, 

KEEP. 
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Table 4. Membername Processing 



User Specification 



Action of Initialization Routine 



h 



Membername not specified on EDIT 
Command and data set is 
partitioned 



"TEMPNAME" is used as the member 
name. 



Member specified and member 
found in data set # or member 
TEMPNAME defaulted and member 
TEMPNAME found in data set. 



After successful validation of 
operands and attributes, invokes 
initial copy routine (IKJEBECO) to 
create utility work file and checks 
results as follows: 

- if an error has occurred (return 
code from IKJEBECO = 8) , returns 
control to the TMP. 

- if the member is empty (return 
code = 4) , indicates that the 
Input mode is to be entered. 

- if the member is found (return 
code = 0) , indicates that the 
Edit mode is to be entered. 



h 



Membername specified as OLD 

and member not found in data set. 

(BLDL return code = 4) . 



Informs user that memb 
and returns control to 



er is not OLD 
the TMP. 



Membername specified as NEW. 



Indicates that the Inp 
be entered; sets CAEDM 



ut mode is to 
EM to 0. 



Error has occurred in BLDL process 
(return code = 8) . 



Informs user of error 
control to the TMP. 



and returns 



H 



NOTE: If the user did not specify OLD or NEW and the dat 
successfully allocated by IKJDAIR, the initializat 
prompts the user thru IKJPARS to enter OLD or NEW. 
enters OLD, the EDIT program terminates after issu 
appropriate error message; if the user enters NEW, 
is deferred until the user enters SAVE. 



a set is not 
ion routine 

If the user 
ing the 
allocation 
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I PLI^or^PLIF^ Source Margins 



User Specification 



| Action of Initialization Routine 



Source margins specified; left | Inform user that specified margins 

margin greater than right margin, |are invalid and default to 2 and 

or right margin exceeds data | 72 . 

length of records. | 



h 



Source margins specified; left | Initialize margins with values 

margin less than right margin; | specified. 

right margin less than or equal to| 

data length (LRECL less sequence | 

number length) of records in data | 

set. | 

i 



NOTE: If CHAR60 is specified for any of the above, a sixty-character 
character set is indicated by setting the CACHAR60 bit of 
IKJEBECA to 1. If CHAR48 is specified, CACHAR48 is set to 1. 
The default is CHAR60. 



SCANZ50SGAN_Keyword 



~l 1 

| Action of Initialization Routine | 



User Specification 



I h 

| User entered SCAN; syntax checker jSets CASCANON to 1, 
lis available, and data set type | 
| allows scanning. I 



h 



-h 



H 



|User entered SCAN; syntax checker | Informs user that syntax checker 

|is not available in system. |is not available in system. 

| | Terminates EDIT with return code of 

I M2. 



h 



■+- 



|User entered SCAN; syntax checking | Informs user that SCAN is invalid 
|is not applicable to data set |for data set type; terminates EDIT 
jtype. jwith return code of 12. 

i i 



£INE_Keyword_ i and, Keyword, Value 

The value entered for the LINE keyword is used as the logical record 
length (LRECL) for a new data set. This value may be entered by the 
user only when creating a new data set or editing an old and empty data 
set. The keyword value or the LRECL from the DS1LRECL field of the DSCB 
is checked against values obtained from the processor data table 
(IKJEBEPD) for the particular data set type. If the DS1RECFM field 
indicates a record format of V or V blocked, and variable format records 
are not compatible with the data set type, the user is informed and EDIT 
is terminated. 
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User Specification 



Action of Initialization Routine 



Data set is NEW, user did not 
enter the LINE keyword; the 
default for RECFM is V. 



Initializes CALRECL to default 
value for LRECL and sets CARECFM 
to 0. 



Data set is NEW, user did not 
enter the LINE keyword; the 
default for RECFM is F. 



Initializes CALRECL to default 
value for LRECL and sets CARECFM 
to 1. 



Data set is NEW, user entered 
LINE keyword; RECFM = F default 
is required; LINE value is 
equal to default value. 



Initializes CALRECL to value 
supplied by user and sets CARECFM 
to 1. 



Data set is NEW, user entered 
LINE keyword; RECFM = F default is 
not required; LINE value is 
equal to or less than the maximum 
value . 



Initializes CALRECL to value 
supplied by user and sets CARECFM 
to 1. 



h 



H 



Data set is NEW, user entered 
LINE keyword; LINE value is not 
equal to default value and default 
value is required. 



Informs user that LINE value 
supplied by him is invalid; 
initializes CALRECL and CARECFM to 
proper values according to defaults 
for the record format. (See 
Obtaining Processor Dependent 
Information in this section.) 



H 



Data set is NEW, user entered 
LINE keyword; RECFM = F default is 
not required; LINE value is 
greater than maximum value. 



Informs user that LINE value 
supplied by him is invalid; 
initializes CALRECL and CARECFM 
to proper values according to 
defaults for the record format. 



Data set is OLD, user did not 
enter the LINE keyword; RECFM = 
default is required; DS1LRECL 
value is equal to default LRECL. 



Initializes CALRECL to value of 
DS1LRECL and CARECFM to value of 
DS1RECFM. (Terminates if DS1RECFM 
other than F or F blocked.) 



Data set is OLD, user did not 
enter the LINE keyword; RECFM = F 
default is not required; DS1LRECL 
value is less than or equal to 
default LRECL. 



Initializes CALRECL to value of 
DS1LRECL and CARECFM to value of 
DS1RECFM, if record format is F, 
F blocked, V or V blocked. 



Data 

LINE 

requi 

equal 

= F d 

DS1LR 

equal 



set is OLD, 
keyword; RE 
red and DS1 

to default 
efault is n 
ECL value i 

to default 



user entered 
CFM = F default is 
LRECL value is 

LRECL, or RECFM 
ot required and 
s less than or 

LRECL. 



Initializes CALRECL to value of 
DS1LRECL and CARECFM according to 
the value of DS1RECFM, if RECFM is 
F or F blocked; informs user that 
LINE keyword is ignored for OLD 
data sets. 



h 



Data 
is re 
equal 
= F d 
DS1LR 
maxim 



set is OLD; 
quired; DS1 
to default 
efault is n 
ECL value i 
um LRECL 



RECFM = F default 
LRECL value is not 

LRECL, or RECFM 
ot required, and 
s greater than 



Informs user that DS1LRECL is 
invalid for data set type and 
terminate EDIT. 
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g&QCK.Keyword. ana Keyword Va lue 

The value entered for the BLOCK keyword is used as the block size 
(BLKSIZE) for a new data set. This keyword is invalid for an old data 
set; if a value is entered for BLOCK and the data set is OLD and not 
empty, the user is informed that the value will be ignored. Checking of 
the BLOCK keyword assures compatibility of the values specified for LINE 
and BLOCK. 



User Specification 



Action of Initialization Routine 



H 



User did not enter the BLOCK 
keyword. 



Uses CABLKS field 
data table as foil 
fixed-format data 
to the greatest po 
multiple of LRECL 
BLKSIZE less than 
Sysgen maximum, i 
CABLKS=[ CABLKS/CAL 
(For record format 
CABLKS is used.) 



of the processor 
ows: for 
sets, sets CABLKS 
ssible integer 
that produces a 
or equal to the 
e. 

RECL]X CALRECL 
V data default 



H 



User entered BLOCK keyword; 
RECFM = F and BLOCK/LINE is an 
integer, or RECFM is not F and 
BLOCK is at least 4 greater than 
LINE, but less than or equal to 
Sysgen maximum. 



Initializes CABLKS to value 
supplied by user. 



User entered BLOCK keyword; 
RECFM = F and BLOCK/LINE is not ai 
integer, or RECFM is not F and 
BLOCK is either less than LINE+4 
or greater than Sysgen maximum. 



Inform user that BLOCK value 
supplied by him is invalid; uses 
Sysgen value as default. 



For old data sets, the device-dependent information needed to compute 
the number of records in the data set is obtained by issuing the DEVTYPE 
macro instruction. The number of records in the data set is computed 
according to the following formulae: 

T (# of tracks in old data set)=TT(from DS1LSTAR)+1 

LB (last block on track) =DS1BLKL- (device overhead for last 
block) - (device overhead for non-keyed records) 

B (other than last block) =[( (DS 1BLKL*device tolerance 

factor) /512) ]+ (device overhead for other than last block) - (device 
overhead for non-keyed records) 

N (# of blocks/track) =1 + [ (track size - LB) /B ] 

R (# of records) =T* (DS 1BLKL/DS 1LRECL) *N for RECFM=F, or 
= T*(DS1BLKL/30) *N for RECFM=V. 

When computed, the number of records (R) in the OLD data set is saved in 
CAUTILNO. The Utility Data Set Initialization Routine (IKJEBEUI) will 
use this value in determining the size of the utility data set to be 
allocated. 
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NUM/NONUM_Ke£Word 



I 



User Specification 



| Action of Initialization Routine | 



I 

|NONUM Keyword is specified and 
| data set must be numbered. 



4- 



H 



I 

|NONUM keyword is specified and 
| data set need not be numbered. 



Inform user that data set must be 
numbered and ignore NONUM keyword. 



Indicate that data set is not to 
contain sequence numbers. 
(CANONUM is set to 1) 



h 

|NUM keyword specified, data set 
|type is ASM, and sequence numbers 
|do not begin between positions 73 
land 80, or NUM operand specified, 
| data set type is ASM, and sequence 
Inumber length is invalid, i.e., 
Igreater than 8, or NUM operand 
Ispecified, data set type is ASM, 
land sequence number starting 
jposition and length are invalid. 



f- 



Inform user that sequence number 
starting position and length are 
invalid and default to starting 
position of column 73 and number 
length of 8. 



J- 

| NUM keyword spec 
jtype is ASM, and 
Istarting positio 
| valid. 
i p 



+- 



ified, data set 

sequence number 
n and length are 



Initialize sequence number starting 
position and length with values 
obtained from NUM keyword. 



CAPS/ASIS_Key_word 



User Specification 



|Action of Initialization Routine 
+ 



User did not enter CAPS or ASIS 
keyword. 



H 



|Sets CACAPS field in the EDIT 

| Communication Area to default for 

|data set type. 



H 

| Sets CACAPS field to 1, 

+ 



User entered CAPS. 



User entered ASIS, 



Checks acceptability of ASIS in 
| data set type; if ASIS is 
Jacceptable, sets CACAPS field to 0, 
| if not acceptable, (data set type 
| requires CAPS) informs the user and 
| set CACAPS to 1. (See Obtaining 
| Processor-Dependent Information.) 
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gQZQgT_Data_Set_Tx£e_FgEE/FIXEp Keyword 

This keyword specifies the format of input statements. 



User Specification 



| Action of Initialization Routine | 



+■ 



H 



User entered FREE, 



| Ensures th 
| sets and s 
| EDIT Commu 
|RECFM=F, i 
| terminates 



at RECFM=V for old data 
ets CAFREE field in the 
nication Area to 1; if 
nforms user of error and 



User entered FIXED. 



| Determines if LRECL = 80 and the 
|RECFM = F; if not and data set is 
|new, informs the user and uses 
Jdefault values; if not, and data 
| set is old, informs the user and 
jterminates; if LRECL=80 and 
|RECFM=F, sets CAFREE to 0. 



I h 

| User did not enter FREE or FIXED. | Defaults to FREE, 



User-Generated Data Set Type Keyword 

This keyword describes the action taken for user-generated data set type 
subfields . 



- T 1 

{Action of Initialization Routine 



User Specification 



User entered data set type with 
jsubfield parameters. 



Verify that user exit routine is in 
the system; if not,- inform user and 
terminate. If in system, invoke 
exit routine to encode the 
parameters into the CACHKOPT field. 



user entered data set type 
without subfield parameters- 



Same as above . 



t 



ote ; If no user exit routines were specified at system generation 
. time, this operation is not defined in the initialization 



I 



routine. 
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Table 



Summary of Initialization Operations (Part 1 of 7) 



h 



Command or 
Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 
in 
Processing 



Function Description 



MO 
ID 



Flow 
Chart 

ID 



EDIT 



data 
set 
name 
(fully- 
quali- 
fied) 



NEW 



None 



Terminal 

Monitor 

Program 



Invokes command scan TSO 
service routine (IKJSCAN) 
to determine if EDIT is 
a valid TSO command; 
locates EDIT command 
processor program (IKJE- 
EEIN) in SYSl.CMDLIE; 
passes control to the EDIT 
program via ATTACH, 



IKJEEEIN 



Euilds and initializes 
EDIT communication area 
(IKJEEECA) ; invokes the 
PARSE TSO Service routine 
(IKJPARS) to syntax check 
the EDIT command; invokes 
the Parse TSO service rou- 
tine ( IKJPARS) to prompt 
the user for the data set 
type; invokes the proces- 
sor data table search rou- 
tine (IKJEBEPS) tc obtain 
data set type information 
for inclusion in the Edit 
Communication Area; 
invokes the Access Method 
initialization routine 
(IKJEEEUI) to load the 
Access Method (IKJEBEAA) 
and to allocate a utility 
data set; indicates that 
the Input mode is to be in 
effect; passes control to 
the controller routine 
(IKJEBEMA) via XCTL. 



01 



CC-CJ 



IKJEEEPS 



Searches the processor 
data table (IKJEBEPD) for 
the data set type speci- 
fied by the user; finds 
the processor-dependent 
information for the parti- 
cular data set type 
(default blocksize, line 
number starting column, 
syntax checker name, etc.) 
and returns its address to 
the IKJEBEIN* 



DH 



IKJEEEUI 



Loads the Access Method 
(IKJEBEAA) into storage; 
invokes the TSO data set 
allocation service routine 
(IKJEAIR) to allocate the 
utility data set. 



26 



EQ 



(Part 1 of 7) 
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Table 5. Summary of Initialization Operations (Part 2 of 7) 



Command or 
Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 

Involved 

in 

Processing 



Function Description 



MO 
ID 



[Flow 
I Chart | 
ID 



H 



EDIT 
Continued 



IKJEEEKA 



EDIT 



+ 

data 

set 

name 

(fully- 

quali 

fied) 



— + + 



OLD 
(empty 
sequent- 
ial data 
set)- 



None 



Terminal 

Monitor 

Program 



Invokes the INPUT 
subcommand processor 
(IKJEEEIP) which will 
write subsequent lines of 
terminal input via the 
Access Method into the 
utility data set; (See 
INPUT Subcommand 

Processing) . 

Same function as above. 



C2 



ICW-CYI 






*- 



IKJEEEIN 



f 

Euilds and initializes 
EDIT communication area 
(IKJEEECA); invokes the 
Parse TS0 service routine 
(IKJPAJRS) to prompt the 
user for the data set 
type; invokes the proces- 
sor data table search rou- 
tine (IKJEEEPS) to obtain 
data set type information 
for inclusion in the Edit 
Communication Area; 
invokes IKJDAIR to alloc- 
ate data set; invokes the 
Access Method initializa- 
tion routine (IKJEBEUI) to 
load the Access Method and 
to allocate a utility data 
set; indicates that the 
Input mode is to be in 
effect; passes control to 
the controller routine 
(IKJEEEMA) via XCTL. 



CI 



-f 1 

ICC-CJI 



I. ~ 

IKJEBEPS 
IKJEEEUI 



Same function as above. 
Same function as above. 



f 

26 



IKJEBEMA 



Same function as above. 



02 
(Part 



j 

DH 

4 1 

EQ 

J 

CW-CY| 
J 
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Table 



Summary of Initialization Operations (Part 3 of 7) 



I- 



Command or 
Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 
in 
Processing 



Function Description 



MO 
ID 



Flow 
Chart 
ID 

f 1 



EDIT 



data 
set 
name 
(par- 
tially 
quali- 
fied) 



OLD 



None 



Terminal 

Monitor 

Prograir 



Same function as above. 



IKJEBEIN 



Builds and initializes 
EDIT communication area 
(IKJEBECA) ; invokes the 
IKJPARS routine to syntax 
check the EDIT command; 
invokes the Parse TSO ser- 
vice routine (IKJPARS) to 
prompt the user for the 
data set type; invokes the 
TSO default service rou- 
tine (IKJDFLT) to fully- 
qualify the data set name; 
invokes the processor data 
table search routine 
(IKJEBEPS) to obtain data 
set type information for 
inclusion in the Edit Com- 
munication Area; invokes 
the TSO data set alloca- 
tion service routine (IKJ- 
DAIR) to allocate the Edit 
data set identified in 
•dataset name'; loads 
IKJEEEUT; invokes the ini- 
tial copy routine (IKJEBE- 
CO) to copy the contents 
of the Edit data set into 
the utility data set; 
deletes IKJEBEUT indicates 
that the Edit mode is to 
be in effect; passes con- 
trol to the controller 
routine (IKJEBEMA) via 
XCTL. 



01 



4 1 

CC-CJ 



IKJEBEPS 



Same function as above. 



DH 



IKJEEEUI 



Same function as above. 



26 



EQ 



IKJEBECO 



Invokes the Access Method 
initialization routine 
(IKJEBEUI) to allocate a 
utility data set; reads 
into storage every record 
from the Edit data set; 
transforms the format of 
the records to that used 
by the Access Method; 
invokes the IKJEEEUT to 
write the reformatted 
records into the utility 
data set. 



AU-AW 



H 



IKJEEENA 



Indicates that the Edit 
mode is in effect by issu- 
ing the "Edit" mode 
message. 



C2 



H 



(Part 



CW-CY 



.1. J 
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Table 5, Summary of Initialization Operations (Part 4 cf 7) 

r T T T T T 



Command or 
Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 
in 
Processing 



Function Description 



MO 
ID 



| FlOVv 

I Chart | 

ID 

-4 H 



EDIT 



data 
set 
name 
(fully- 
quali- 
fied) 



OLD 
BASIC 
or 
IPLI 

NCSCAN 



None 
None 

None 
None 



Terminal 

Monitor 

Program 



Same function as above. 



IKJEEEIN 



^ 

IKJEBEPS 



Euilds and initializes 
EDIT communication area 
(IKJEEECA); invokes the 
PkFSE TSO Service routine 
(IKJPARS) to syntax check 
the EDIT command; invokes 
the processor data table 
search routine (IKJEBEPS) 
to obtain data set type 
information for inclusion 
in the Edit Comirunication 
Area; invokes the TSO data 
set allocation service 
routine (IKJDAIR) to 
allccate the Edit data set 
identified in • dataset 
name'; checks if language 
processor is available in 
systeir; loads IKJEEEUT; 
invokes the initial copy 
routine (IKJEEECO) tc copy 
the contents of the Edit 
data set into the utility 
data set; deletes IKJE- 
EEUT; indicates that the 
Edit mode is to be in 
effect; passes ccntrcl to 
the controller routine 
(IKJEEEMA) via XCTL. 

Same function as above. 



CI 



-+ -1 

I CC-CJ 



4 i 

DH 



IKJEEEUI 



Same function as above. 



26 



EQ 



IKJEBECO 
IKJEEEN.A 



Same function as above. 

Loads language processor | C2 
and indicates its address! 
in CAPTCHIC field; invokes | 
IKJEBESC to initialize) 
language processing; indi- | 
cates that Edit mode is in| 
effect. 



AU-AWJ 

f 1 

CW-CY I 



-JL 

(Part 



4 of 7) 
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Table 



Summary of Initialization Operations (Part 5 of 7) 

T T —T T T 

Modules 
Involved 
Command or| | | Keyword | in 
Subcommand | Operand (Keyword | Value (Processing 



h 



Function Description 



MO 
ID 



Flow 
Chart 
ID 

+ 1 



EDIT 



dataset 
name 
(fully- 
quali- 
fied) 



OLD 

ASM 

or 

CCBOL 

or 

FCRTGI 

or 

TEXT 

or 

DATA 

or 

CLIST 

or 

CNTL 

ASIS 



None 
None 

None 

None 

None 

None 

None 

None 
None 



Terminal 

Monitor 

Prograir 



Same function as above. 



IKJEBEIN 



Builds and initializes 
EDIT communication area 
(IKJEBECA>; invokes the 
PARSE TSO Service routine 
(IKJPARS) to syntax check 
the EDIT command; invokes 
the processor data table 
search routine (IKJEBEPS) 
to obtain data set type 
information for inclusion 
in Edit Communication 
Area; invokes the TSO data 
set allocation service 
routine (IKJDAIR) to 
allocate the Edit data set 
identified in 'dataset 
name'; determines whether 
ASIS is acceptable for the 
data set type by checking 
the processor-dependent 
information inserted in 
the communication area by 
the processor data table 
search routine; if ASIS is 
acceptable, sets CACAPS to 
zero; loads IKJEBEUT; 
invokes the initial copy 
routine (IKJEBECO) to copy 
the contents of the Edit 
data set into the utility 
data set; deletes IKJE- 
BEUT; indicates that the 
Edit mode is in effect; 
passes control to the con- 
troller routine (IKJEEEMA) 
via XCTL. 



01 



IKJEEEPS 



Same function as above. 



IKJEBEUI 



Same function as above. 



26 



t 

| IKJEEECC 



Same function as above. 



± 

| IKJEBEMA 
~L 



Same function as above. 



4 -I 

CC-CJ 



DH 
EQ 



02 
(Part 



AU-AW 
j 

CW-CY 
J J 
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Table 



Summary of Initialization Operations C Part 6 of 7) 



»~ 



Command or 
Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 

Involved 

in 

Processing 



Function Description 



MO 
ID 



| FlOW 
| Chart | 
ID 



EDIT 



dataset 
name 
(fully- 
quali- 
fied) 



OLD 
PLI 

CHAR4 8 



None 

integerl 

integer2 



Terminal 

Monitor 

Prograir 



Same function as above. 



IKJEBEIN 



Builds and initializes 
EDIT communication area 
(IKJEBECA) ; invokes PARSE 
TSO Service routine (IKJ- 
PARS) to syntax check the 
EDIT command; invokes the 
processor data table 
search routine (IKJEBEPS) 
to obtain data set type 
information for inclusion 
in Edit Communication 
Area; invokes the TSO data 
set allocation service 
routine (IKJDAIR) to 
allocate the data set 
identified in 'data set 
name'; determines if the 
values specified for left 
and right margins are 
valid, that is, the left 
margin value is smaller 
than the right margin 
value, and the right mar- 
gin does not exceed the 
data length, less the 
sequence number length; 
sets CACHAR48 in the com- 
munication area to indic- 
ate that the M8-character 
character set is to be 
used; loads IKJEEEUT; 
invokes the initial copy 
routine (IKJEEECO) tc copy 
the contents of the Edit 
data set into the utility 
data set; deletes IKJE- 
EEUT; indicates that the 
Edit mode is in effect; 
passes control tc the con- 
troller routine (IKJEBEMA) 
via XCTL. 



01 



-J 



ICC-CJI 



IKJEBEPS 



Same function as above. 






IKJEEEUI 



Same function as above. 



26 



j 

DH 

-f 1 

EQ 



IKJEBECO 



Same function as above. 



IAU-AWI 



IKJEEEKA 



Same function as above. 



C2 

Part 



I CW-CY 1 
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Table 5. Summary of Initialization Operations (Part 7 of 7) 

r T T T T T" 



h 



Command or 
Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 
in 
Processing 



Function Description 



MO 
ID 



FlOW 

Chart 
ID 



H 



EDIT 



dataset 
name 
(fully- 
quali- 
fied) 



OLD 

GCFORT 
SCAM 
NUM 



None 
(FIXED) 
None 



Terminal 

Monitor 

Program 



Same function as above. 



IKJEEEIN 



Euilds and initializes 
EDIT Communication Area 
(IKJEEECA); invokes PARSE 
TSO Service routine (IKJ- 
PARS) to syntax check the 
EDIT command; invokes the 
processor data table 
search routine (IKJEEEPS) 
to obtain data set type 
information for inclusion 
in the Edit Communication 
Area; invokes the TSO data 
set allocation service 
routine (IKJDAIR) to 
allocate the data set 
identified in "data set 
name"; determines if syn- 
tax checker is available; 
if syntax checker is 
available, indicates the 
fact by setting CASCANON 
to 1; initializes sequence 
number starting position 
and length with default 
values for NUM keyword; 
loads IKJEEEUT; invokes 
the initial copy routine 
(IKJEEECO) to copy the 
contents of the Edit data 
set into the utility data 
set; deletes IKJEBEUT; 
indicates that the Edit 
mode is in effect; passes 
control to the controller 
routine (IKJEBEMA) via 
XCTL. 



CI 



CC-CJ 



IKJEBEPS 



Same function as above. 



DH 



IKJEEEUI 



Same function as above. 



26 



EQ 



IKJEBEC0 
J 

I IKJEEEKA 



Same function as above. 

Loads the appropriate syn- | C2 
tax checker; invokes the | 
SC£N Subcommand processor | 
to initialize it; indi- 
cates that the Edit mode 
is in effect by issuing 
the "EDIT" mode message. 



AU-AW 

f- 1 

CW-CY 
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When it is necessary to prompt the user for a data set type, the 
initialization routine invokes IKJPTGT to prompt the user for a data 
set type. The response is passed to IKJPARS to be validated. If the 
response is not a valid data set type, the prompt response buffer is 
freed and the above processing is repeated until either an attention 
is issued or a valid data set type is entered. If the response is 
valid, the initialization routine invokes the processor data table 
search routine (IKJEBEPS) to obtain the processor-dependent 
information. The information returned by IKJPARS is saved so that 
any subfield information associated with the data set type entered 
may be later processed by the initialization routine. 



b t aining_Processor- Dependent. Info r mat ion 

The initialization routine invokes the processor data table search 
routine (IKJEBEPS) via the LOAD and CALL macro instructions. IKJEEEPS 
searches the processor data table (IKJEBEPD) for an entry corresponding 
to the data set type, which was passed to IKJEBEPS by the initialization 
routine. When a matching entry is found, the search routine returns a 
pointer to the entry back to the initialization routine. The 
initialization routine, in turn, moves the table entry for the data set 
type into the CADSTYPE field of the EDIT Communication Area (IKJEBECA) 
and deletes IKJEBEPS. If the processor-dependent information is 
unavailable, the initialization routine informs the user prior to 
deleting IKJEBEPS. 

Termination_Processing 

If an unrecoverable error has occurred during EDIT program 
initialization, the initialization routine issues the TCLEARQ macro to 
clear the input queues, invokes the TSO stack service routine (IKJSTCK) 
to delete all elements but the terminal from the input stack, deletes 
the service routines, frees the storage used by the EDIT Communication 
Area (IKJEBECA) and the IKJPARS PDL and returns to the Terminal Monitor 
Program. 
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Controller 

The controller routine (IKJEBEMA) receives control from the 
initialization routine (IKJEBEIN) after the operands and keywords 
specified with the EDIT command have been processed. The controller 
directs the operation of the EDIT program in accordance with user 
specifications and requests and with conditions arising within the EDIT 
program by: 

• Invoking the appropriate subcommand processor, when the user enters 
a subcommand. 

• Handling the attention interruption (via the attention exit routine, 
IKJEBEAT) , if the user depresses the ATTN key. 

• Invoking the SCAN subcommand processor (IKJEEESC) to call the 
language processor for initial entry and to send lines, one by one, 
for translation (if the data set type is BASIC or IPLI) , if the user 
specified the SCAN keyword on the EDIT command. 

• Providing for the updating of the reverse Polish-notated data set, 
if the data set type is either BASIC or IPLI. 

Note: See the topic, "Syntax Checking" for a discussion of the 
reverse Polish-notated data set. 

• Establishing either the Input or the Edit mode of operation, 
depending upon whether the user's data set is empty or not. 

• Handling message verification for all EDIT subcommands except 
CHANGE. 

• Handling error conditions which result in termination of the EDIT 
program (via the abnormal end exit routine, IKJEBEAE) . 

• Returning control to the Terminal Monitor Program upon the normal 
completion of END subcommand processing. 

£2H££oil££_E£ocessinc[ 

This topic describes the way in which the controller routine directs the 
operation of the EDIT program. The operations of the controller routine 
which relate to normal subcommand processing are summarized in the 
tables found in the descriptions of the subcommand processors. 

Abnormal_End_and_Attention_Exits 

The controller routine establishes the abnormal end and attention exits 
by means of the STAE and STAX macro instructions. If the exits cannot 
be established, the EDIT program is terminated and the controller 
returns control to the TMP. See the topic, "Error and Attention 
Handling" for a description of the error and attention exit routines. 

SCAN_Processinc[ 

If the user has specified a BASIC or IPLI data set type, the controller 
loads the appropriate syntax checker into storage. The controller 
invokes the SCAN subcommand processor (IKJEBESC) to initialize the 
checker. If the data set type is other than BASIC or IPLI, the 
controller routine determines if the appropriate syntax checker is to be 
loaded by checking if CASCANON is set to 1 . If it is, the controller 
loads the syntax checker and invokes the SCAN subcommand processor to 
initialize the syntax checker. See the topics "Syntax Checking" and 
"SCAN Subcommand Processing" for more information about syntax checking. 
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Istablishina_Mode_of_EDIT_0£eration 

Depending upon the organization of the data set the controller routine 
checks the status of either the CAEDMEM or the CAEDDISP field in the 
EDIT Communication Area (IKJEBECA) to determine if Input or Edit mode 
should be entered. 

The Edit mode is indicated if the data set organization is sequential 
and CAEDDISP=1, or if the data set organization is partitioned and 
CAEDMEM=1. The controller prompts the user to enter a subcommand by 
issuing the Edit mode message thru the PUTGET service rotuine (IKJPTGT) . 

The Input mode is indicated if the data set organization is 
sequential and CAEDDISP=0, or if the data set organization is 
partitioned and CAEDMEM=0. The controller invokes the INPUT subcommand 
processor (IKJEBEIP) . Input received from the terminal is considered to 
be data; it will be written into the utility data set with no 
intervention on the part of the controller until the Edit mode is 
established. 

Note: The CAEDMEM field refers to partitioned data set organization, 
and indicates whether the member exists or is to be created. The 
CAEDDISP field refers to the disposition of the data set, i.e., the 
field = for new, or old and empty data sets, or the field = 1 for old 
(not-empty) data sets. 

0btainin2_an_EDIT_Subcgmmand 

After invoking the PUTGET service routine to obtain a subcommand, the 
controller routine tests the return codes from PUTGET to determine what 
action to take. 



Condition 



I 



Action of Controller Routine 



I'- 
ll 
IP 



nput entered from terminal; 
UTGET return code = 0. 



I'- 
ll 
|c 
IP 

|A 
IP 



h 



Sets CANINPROC bit to zero; 
validates subcommand. (See 
"Validating an EDIT subcommand".) 



nput is from an in-storage list 
reated by a command procedure; 
UTGET return code = 4. 



Sets CAINPROC bit to one: validates 
subcommand. (See "Validating an 
EDIT subcommand".) 



H 



ttention interruption occurred; 
UTGET return code = 8. 



Process as attention after 
subcommand termination. See the 
topic, "Error and Attention 
Handling". 



| Input could not be obtained from 
| terminal; PUTGET return 
jcode = 12. 



Delete second-level messages and 
invoke PUTGET again. 



INOWAIT specified for TPUT; PUTGET 
Ireturn code = 16. 



Issues message 
and terminates 



IKJ52313I 
EDIT progran 



INOWAIT specified for TGET; PUTGET 
jreturn code = 20. 



Issues message 
and terminates 



IKJ52313I 
EDIT program. 



Jlnvalid parameters; PUTGET return 
| code = 24. 



Issues message 
and terminates 



IKJ52313I 
EDIT program. 



|No main storage available; PUTGET 
jreturn code = 28. 

L 



Issues message 
and terminates 



IKJ52312I 
EDIT program. 



50 EDIT 



TSO Command Processor PLM - Vol. 3 (Release 21) 



If the input entered is a null line (that is / a carriage return) , the 
controller invokes the INPUT subcommand processor (IKJEBEIP) , thereby 
establishing the Input mode. 

XaliMii£3_a.H_!lDIl_Sub command 

The validation of EDIT subcommands is performed in two steps: (1) 
scanning the subcommand buffer by the TSO service routine, IKJSCAN, and 
(2) verifying the subcommand by locating it in a subcommand table, by 
the controller routine. IKJSCAN determines that what was entered is a 
valid EDIT subcommand candidate or a null line. 



Condition 



Action Taken by IKJSCAN 
and Controller 



H 



Question mark entered by user, 



IKJSCAN sets CSOAQM (in CSOAFLG) to 
1; since all question marks should 
have been handled by PUTGET, a 
question mark at this point is an 
error - controller informs user 
that an invalid subcommand was 
entered. 



Invalid subcommand, that is, what 
was entered by the user is not a 
valid EDIT subcommand candidate. 



IKJSCAN sets CSOABAD (in CSOAFLG) 
to 1; controller informs user that 
an invalid subcommand was entered. 



h 



Empty line entered by user. 
(An "empty" line is a line 
containing separator characters 
only) . 



IKJSCAN sets CSOANOL (in CSOAFLG) 
to 1; controller processes as a 
normal return from a subcommand 
processor. (See the following 
topic.) 



A valid subcommand with or without 
operands was entered by the user. 



IKJSCAN sets CSOAVWP or CSOAVNP 
(in CSOAFLG) to 1; controller 
verifies the subcommand and sets 
CAOPERND (in IKJEBECA) to 1 if 
operands are present. 



The controller verifies that the valid subcommand entered by the user is 
a valid EDIT subcommand by checking the IBM-supplied table of 
subcommands and the user-specified table of subcommands. The subcommand 
tables are defined as (IKJEBMA 8,9) CSECTs of the EDIT controller load 
module (IKJEBEMA) . 



Condition 



I 



Action Taken by Controller 



I— 



■+- 



i 



| Subcommand cannot be found in IBM | Informs user that subcommand is 
|or user subcommand table. | invalid by issuing message 
I IIKJ52366I. 



I | An empty line was entered by user . | Prompts user for new subcommand. 

| Subcommand found in subcommand | Invokes appropriate subcommand 
Itable. Iprocessor. (See next topic.) 



Inyoking_an_EDIT_Subcqmmand 

The controller routine invokes an EDIT subcommand processor to perform 
| the function requested by the user. The controller invokes the 
subcommand processor via the LINK macro instruction and checks the 
return code when the subcommand processor relinquishes control. 
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Condition 

uccessful completion of 
ubcommand processing; subcommand 
eturn code = 0. 



Action Taken by Controller | 

Obtains the next subcommand from 
the current source of input. 



eturn code of 4 returned by 
NSEET subcommand processor 
IKJEBEIS) • 



Invokes the INPUT subcommand 
processor (IKJEBEIP) to establish 
the Input mode. 



Subcommand termination errors 
(subcommand return code 8) or 
invalid subcommand. 



Issues TCLEARQ macro for input if 
the current source of input is the 
terminal; obtains another 
subcommand. Starts error 
termination of EDIT program, if 
current source of input is an 
in-storage procedure. 



Permanent I/O error in utility 
data set; subcommand return 
code = 12. 



Terminates the EDIT progran 



Syntax checker cannot be 
initialized; subcommand return 
code = 16. 



If syntax checker recovery is not 
in progress, indicates that 
recovery should be attempted by 
setting CASCRC20 (in CACFLAG4) to 1 
and invokes the SCAN subcommand 
processor (IKJEBESC) ; if syntax 
checker recovery is in progress and 
has failed, indicates that syntax 
checker clean-up is to be performed 
by setting CASCRC20 to and 
invokes IKJEBESC. 



Handling., an_ Attention Interrupt 

Whenever the return code from a subcom 
new subcommand is to be obtained, that 
finished its operation, the controller 
attention interrupt has occurred durin 
attention interrupt has occurred, the 
has updated the CAPTIBFR field of the 
to point to the attention buffer. The 
second-level messages and obtains the 
attention buffer. See the topic, "Err 
description of the attention exit rout 



and processor indicates that a 

is, the subcommand processor has 

routine determines if an 
g subcommand processing. If an 
attention exit routine (IKJEBEAT) 
EDIT Communication Area (IKJEBECA) 

controller deletes any gueued 
subcommand which is in the 
or and Attention Handling" for a 
ine. 



I§£ifX_Me.ssac[e_Handling[ 



The ve 
by the 
has be 
indica 
curren 
change 
indica 
operat 
CATEMP 
verify 
messag 
servic 



rify me 
curren 
en chan 
tes tha 
t line 
d; the 
te that 
ion of 
BF+12. 

messag 
e is to 
e routi 



ssage is a 
t line poin 
ged. The u 
t he wants 
pointer if 
subcommand 

the value 
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Termination_Processinc[ 

The controller routine terminates the EDIT program when an unrecoverable 
error has occurred in the EDIT program by: 

• Deleting the Input Stack (via the STACK service routine) . 

• Clearing the input queues (via the TCLEARQ macro) . 

• Invoking the END subcommand processor at entry point IKJEBEXT to 
free system resources used by EDIT. 

When the END subcommand processor returns control , the controller frees 
the storage used by the EDIT Communication Area (IKJEBECA) and returns 
to the Terminal Monitor Program with return code 12. The communication 
area is not freed subsequent to an abnormal end (ABEND) . This allows 
proper closing of any open data sets allocated to EDIT. 

Error and Attention Handling 

The abnormal end exit routine (IKJEBEAE) intercepts Abend conditions 
occurring at the EDIT program (task) level. The attention exit routine 
(IKJEBEAT) handles attention interrupts. 

Abnormal. End Exit., Routine 

The abnormal end exit routine: 

• Stops automatic line prompting. 

• Frees PARSE PDL and input buffer storage. 

• Issues diagnostic message IKJ52422I. 

• Requests scheduling of a retry routine. 

The ABEND completion code is placed in the ECT (ECTRTCD) and the 
Abend-in-progress flag (the high-order but of EDTRCDF in ECT) is set to 
1. IKJEBEAE issues the SPAUTOPT macro to stop automatic line prompting. 
If EDIT has obtained an input buffer and PARSE PDL storage through a 
GETMAIN macro instruction, the storage is returned to the system. The 
abnormal end exit routine then invokes the message selection service 
routine (IKJEBEMS) to display a two-level message containing the Abend 
completion code which has been converted into printable hexadecimal. 
After the message has been displayed, the abnormal end exit routine 
returns to the caller with the address of the STAE retry routine 
(CAPTRTRY) in register and a return code of 4 in register 15. If the 
ECTATRM bit (in the ECT) is set to 1, no message is issued and the retry 
routine is bypassed, as indicated by a return code of zero to the 
STAE/ABEND interface routine. Method of Operation Diagram 3 (foldout) 
shows the relationship between the EDIT program and STAE/STAI 
processing. 

Attention_Exit_Routine 

The attention exit routine receives control after the user has caused an 
attention interrupt and has entered a line of input. Upon receiving 
control, the attention exit routine issues the STATUS STOP macro 
instruction to stop any dispatchable subtasks that the EDIT program has 
attached. It then examines the input line by invoking the IKJSCAN 
service routine. 
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Condition 



Action Taken by the Attention Exit | 



h 



User entered a null line. 



Re-starts dispatchable 
returns control to the 
which invoked the atte 
routine. 



subtasks and 
TIOC routine 
ntion exit 



--I 



User entered a "?", 



Invokes the PUTLINE service routine 
(IKJPUTL) to display any queued 
second-level messages and the Edit 
mode message; invokes the GETLINE 
service routine (IKJGETL) to obtain 
a new line from the terminal. 



H 



User entered neither a null line 
nor a "?". 



Treats the input line as a 
subcommand; issues POST for the 
attention ECB (CAATTN) ; invokes the 
LANGPRCR module via LINK if BASIC 
or IPLI language processing is in 
effect; issues the STATUS macro to 
restart dispatchable subtasks; 
returns control to the system. 
(See the topic, "Handling an 
Attention Interrupt" in the 
discussion of the "Controller".) 



See Method of Operation Diagram 4 (foldout) for a description of the 
operation of the attention exit routine. 

EDIT Service Routines 

The EDIT service routines perform certain operations required by various 
modules of the EDIT program. These service routines and the functions 
they perform are: 

• IKJEBECI (Command Invoker) - This routine invokes the TSO command 
processors for the FORMAT, HELP, MERGE, PROFILE, and RUN subcommands 
of EDIT. It also invokes any TSO command processors placed in the 
input stack by the TSO RUN command. 

• IKJEBECO (Initial Copy) - This routine writes the contents of the 
Edit data set or an intermediate utility data set into the utility 
data set. 

• IKJEBEDA (Data Set Allocation/Free) - This routine generates a 
dsname and allocates a data set for a reguesting routine by invoking 
the dynamic allocation service routine (IKJDAIR) ; when requested, 
IKJEBEDA frees the data set by invoking IKJDAIR. 

• IKJEBEFC (Final Copy) - This routine writes the contents of the 
utility data set into the Edit data set, the Run data set, the Merge 
data set, the Format data set, or the Save data set. 

• IKJEBELE (Line Edit) - This routine converts lower-case characters 
to upper-case, translates tabulation characters to the required 
number of blanks and formats data into records. 

• IMJEBEMR (Translation) - This routine calls the BASIC or IPLI 
language processor to delete an old reverse Polish-notated data set 
and builds a new reverse Polish-notated data set. 
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• IKJEBEMS (Message Selection) - This routine selects EDIT program 
messages requested by EDIT modules and writes them out by invoking 
the PUTLINE service routine (IKJPUTL) . 

• IKJEBEPS (Processor Data Table Search) - This routine searches the 
processor data table (IKJEBEPD) to obtain data set type attributes. 

• IKJEBERN (BASIC Renumbering) - Renumbers BASIC data sets and changes 
line numbers which appear within the records. 

• IKJEBESE (String Search) - This routine scans records for a 
particular character string and returns a pointer to found text to 
the calling module. 



Invoking TSO Commands (IKJEBECI) 

This routine invokes the following TSO command equivalents of the EDIT 
subcommands; FORMAT (a Program Product) , HELP, MERGE (a Program 
Product), PROFILE, and RUN. While operating under RUN, the command 
invoker also invokes the compiler associated with the data set type, and 
the loader to execute the user's problem program. 

The command invoker receives as input a pointer to a parameter list 
containing a pointer to the EDIT Communication Area and a pointer to a 
buffer in which the caller has placed the model command. The command 
invoker builds a parameter list (shown in Figure 10) and passes control 
to the specified TSO command by issuing the ATTACH macro instruction 
with the STAI exit option. 



Parameter List 



Command Buffer 




-7^ 



\ User 



Profile Table 



[ Protected Step Control Block 



| Envi 



ronment Control Table 



RUN Dataset Name 



Model Command 

Command Built by the RUN Subcommand 

Processor (IKJEBERU). 



7 



Figure 10. IKJEBECI Output Parameter List 



If the subtask ends abnormally, control is passed to the command invoker 
STAI exit. The command invoker terminates the subtask by issuing the 
DETACH macro instruction, informs the user that the subcommand has ended 
abnormally, and returns control with return code of 8 in register 15. 
The command invoker invokes the TSO data set allocation/free service 
routine (IKJDAIR) to mark any data sets allocated by the subtask as not 
in use and issues the DETACH macro instruction to terminate the subtask. 
The command invoker then returns control with a zero return code, if 
there is no error. 



If the subtask returning normally to the command invoker is the TSO 
RUN command, the command invoker reads the in-storage commands built by 
RUN. The command invoker, through a series of ATTACH macro 
instructions, invokes those programs specified by RUN to compile, load 
and execute the user's program. If RUN ends normally, the command 
invoker terminates the subtask by issuing the DETACH macro instruction 
and invokes IKJDAIR to mark any allocated data sets as not in use. If c 
subtask completes abnormally, prior to returning control to its caller 
the command invoker invokes the TSO STACK service routine (IKJSTCK) to 
delete the pointer to the in-storage command list. 
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Iniiia:l_Co£xill2_-iIiiiIJlEC0). 

This routine is used whenever a utility data set must be created from an 

I old, existing data set or member of a partitioned data set which may be 
accessed by QSAM. The initial copy routine reads the QSAM- formatted data 
set and transforms the format of the records into the format used by the 
EDIT Access Method. It then writes the records into the utility data set 
using either the line number (if the data set is line numbered) or a 
generated number (if the data set is not line numbered) as the key. 

The initial copy routine receives a pointer to the EDIT communication 
area, which contains the fully-qualified name and the ddname of the data 

I set from which the records are to be copied. The initial copy routine 
initializes a DCB for the QSAM data set and opens the data set. If the 
data set is successfully opened, the first read flag (CORDFLAG in the 
EDIT communication area) is set to 1. The initial copy routine then 
invokes the Access Method initialization routine (IKJEBEUI) to allocate 
the utility data set and to initialize the EDIT Access Method. If the 
Access Method initialization completes normally, the initial copy 
routine selects the appropriate utility data set record format 
(fixed-length, numbered or unnumbered, or variable-length, numbered or 
unnumbered) to be used. The initial copy routine issues a GET macro 
instruction for each record in the QSAM-f ormatted data set and changes 
the record format to that used by the Access Method. After the record's 
format has been changed, the initial copy routine invokes the Access 
Method interface routine (IKJEBEUT) to write the record into the utility 
data set. When all the records from the old QSAM data set have been 
written into the utility data set, the initial copy routine closes the 
QSAM data set and returns control to the caller. 

Allocating_and_Freeing_ ..Data^Sets, JIKJEBEDA^ 

The data set allocating/freeing routine receives control from the FORMAT 
subcommand processor (IKJEEEFO) , the RUN subcommand processor 
(IKJEBERU) , or the MERGE subcommand processor (IKJEBEME) with a pointer 
to the Communication Area which contains the CASAFLAG field and the name 
of the subcommand. The CASAFLAG field is set to X'OO* if allocation of 
a new data set is desired, to XM2 1 for freeing of an allocated data 
set, to X'10 1 for marking a DSE not in use, to X'02 f for allocation of 

| an old data set. For allocation of a new data set, the allocation 
routine (IKJEBEDA) builds a DSNAME in the form: 

| ' USERID.SUBCOMMANDNAME.Dyyddd.Tttttttt.DESCRIPTIVEQUALIFIER 1 . 

USERID is a 1- to 7-byte qualifier obtained from the Protected Step 
Control Block (PSCB) . SUBCOMMANDNAME (the name of the subcommand which 
invoked IKJEBEDA) is obtained from the Communication Area. Dyyddd (a 
6-byte qualifier) is the date obtained when IKJEBEDA issues the TIME 
macro instruction. Tttttttt (an 8-byte qualifier) is the time obtained 

I when IKJEBEDA issues the TIME macro instruction. DESCRIPTIVE QUALIFIER 
is obtained from the Processor Data Table. 

After the DSNAME is built, IKJEBEDA inserts it into the DADSN8 field, 
which is pointed to by an entry in the DAIR parameter block, and invokes 
the TSO data set allocation service routine (IKJDAIR) . IKJDAIR 
allocates the data set with a disposition of NEW, DELETE, DELETE, or 
NEW, CATLG, DELETE for the MERGE subcommand. (The first term of the 
disposition refers to the status of the data set. The second term 
refers to the disposition of the data set after its use. The third term 
refers to the disposition of the data set if the job step abnormally 
terminates.) If the allocation is successful, IKJEBEDA saves the 
DDNAME, DSNAME and length in the Communication Area, sets a return code 
of in register 15, and returns control to the caller. If the 
allocation is unsuccessful, IKJEBEDA issues a message to the terminal 
via the message selection routine (IKJEBEMS) and returns control to the 
caller with a return code of 8 in register 15. 
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IKJEBEDA also frees an existing data set for the RUN, FORMAT, or 
MERGE subcommand processor by invoking IKJDAIR; IKJDAIR frees the data 
set with a disposition of DELETE. If IKJDAIR is successful, IKJEBEDA 
returns a code of and control returns to the caller; if IKJDAIR is 
unsuccessful, IKJEBEDA issues a message and returns control to the 
caller with a return code of 8. 



"SECTION 5: 
IKJDAIR. 



DATA AREAS" contains the format of the parameters passed to 



Final Copying (IKJEBEFC) 

This routine is used whenever the data being edited is to be used or 
processed outside of the EDIT program. The data being edited is 
contained on the utility data set in a record format which is unique to 
EDIT. In order for the data to be usable outside of EDIT, its record 
format is changed to QSAM format. The re-formatted records are then 
written into a QSAM- format data set which has been allocated by the 
caller of this routine. 
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Line_Editinc[__lIKJEBELEl_ 

The line edit routine receives a pointer to the two-word parameter list 
(shown in Figure 11) as input. 




Parameter List 



Code 




Text to be Edited 






EDIT Comm Area 



Code: X'OO 1 Text is not a Delimited String. 
X'80' Text is a Delimited String. 



Figure 11. IKJEBELE Input Parameter List 

If CAPS were specified on the EDIT command (CACAPS in the 
Communication area is set to one) , the line edit routine converts the 
text to upper case characters. If the text is not a delimited string 
and if tabulation settings are in effect (CATABS in the Communication 
Area is set to X'FF") the line edit routine inserts the required number 
of blanks and formats the text line accordingly. If text overflow 
occurs, a pointer to the superfluous text is placed in the first word of 
the parameter list which is returned to the caller. 

If the text is a delimited string or if tabulation settings are not 
in effect (CATABS is set to X'OO 1 ) , the line edit routine changes each 
tabulation character in the text line to a single blank. If the text is 
not a delimited string, the data is formatted into a record for the EDIT 
Access Method. 
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When the text has been edited the line edit routine returns control 
to the caller with either a or a 4 in register 15, Both return codes 
indicate a successful line editing operation. A return code of 4 also 
indicates that an overflow has occurred and that word 1 of the parameter 
list points to the overflow text. 

Hanslating_lIKJEBEMR]_ 

After a successful renumber or merge operation / the reverse 
Polish-notated data set (an in-storage equivalent of the utility data 
set which is needed for BASIC or IPLI) must be updated to reflect the 
changes in the utility data set. IKJEBEMR accomplishes this updating 
(or translating) by invoking the syntax checker for BASIC and IPLI to 
delete the old reverse Polish-notated data set and to build a new one. 



Upon receiving control from either the RENUM subcommand processor 
(IKJEBERE) or the MERGE subcommand processor (IKJEBEME) , the translating 
routine invokes the BASIC and IPLI syntax checker to delete the old 
reverse Polish-notated data set. When the syntax checker returns 
control, the translating routine invokes the Access Method interface 
routine (IKJEBEUT) to read each record of the utility data set. The 
syntax checker is then called to build a new reverse Polish-notated data 
set using the records from the utility data set as input. After the 
syntax checker has built the new in-storage data set, it returns control 
to the translating routine. The translating routine returns control to 
its caller. See the topic: Syntax^Checking for a discussion of the 
parameters passed by the translating routine to the BASIC and IPLI 
syntax checker. 



Selectin£_EDIT_Messa£es_lIKJEBEMS)_ 

This routine selects an EDIT message (a first-level message, 
second-level message or current line display) requested by an EDIT 
module and invokes the TSO PUTLINE service routine (IKJPUTL) to write 
the message to the terminal. The input to the message selection routine 
is shown in Figure 12. 
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Current Line Pointer 

I Value to be Displayed) 

Off: Single or Multi- 
Level Message, 
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to be Displayed. 
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| First Insertion Text List for First - 
' Level Message, or, t Buffer 

Containing Verify Message, or 




f First Insertion Text List for 
Second- Level Message, or 



Verify Buffer ( If Current Record is to be Displayed ) 



Reserved for 
Format Operations 



Binary Key of 
Record 



Text ( Line 
Number Optional) 



2 Variable Length 

(255-Byte Maximum) 

• Record Length + One Word 



Figure 12. IKJEBEMS Input Parameters 
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EDIT messages are contained in the message modules IKJEBEM1 thru 
IKJE5EM7. The messages are arranged in message number sequence with 
second-level messages immediately following the associated first-level 
message. Text to be inserted into an EDIT message is generated by the 
module requesting message output. The text is passed to the message 
selection routine in an insertion list. (See Figure 13.) 



Insertion Text List for 

First- or Second - Level Messages 



Second or Third Word of 
IKJEBEMS Input Parameter List 



Next Insertion List, or 



Length of Text 
+ One Word 



Offset of Text 
into Basic Message 



Insertion Text ( Variable Length ) 



7 



Figure 13. Format of Insertion Lists Passed to IKJEBEMS 

The relationship of insertion text to the basic message is in the 
form: IKJ52303I DATA SET xxxxxx NOT ALLOCATED, REQUIRED VOLUME NOT 
MOUNTED where: xxxxxx is the insertion text to be supplied by the 
requesting module, and DATA SET ... NOT MOUNTED is the basic message. 

First-and second-level messages are arranged in relative message 
number sequence in message modules. Figure 14 shows the format of a 
message module and the way in which a particular message is requested by 
the message selection input parameter list. 



Message Module 




Length of Basic Msg Text - 
+ One Word 



I First Relative Message 



T Second Relative Message 



Second- Level Message, or 



Basic Message 



7 




Offset 
(0, if a 
Basic Msg) 



Figure 14. Message Module Format and Message Selection 

When the message selection routine receives control, it determines if a 
verify message or contents of the record pointed to by the current line 
pointer is to be displayed. If a verify message is to be displayed, the 
CATPUTVF bit in CACFLAG4 in the EDIT Communication Area has a value of 1 
and the second word of the parameter list points to a verify buffer 
containing the current record and line number, if the data set is 
line-numbered. 

The message selection routine formats the line and invokes the 
PUTLINE service routine to write the verify message to the terminal. 
(Figure 14 is a description of the message selection routine output 
parameter list.) 
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If a verify message is not to be displayed (CATPUTVF has a value of 
0) , the input parameter list indicates which message is to be displayed 
and points to insertion text, if there is any. The message selection 
routine loads the message module containing the requested message into 
storage, finds the message, and formats the output parameter list. When 
the output parameter list has been formatted, the message selection 
routine invokes the PUTLINE service routine to write the requested 
message to the terminal. (See Figure 15 for a description of the 
message selection output parameter list.) 



First-leve! Output 
Descriptor 




Note: Segments = Message Parts; A Message Having 
No Inserted Text Comprises 1 Segment; A 
Message Having Two Text Insertions Comprises 
3 Segments. 



Figure 15. IKJEBEMS Output Parameter List 

When the PUTLINE service routine completes its operation, the message 

selection routine returns control to the caller. SECTION^Jk £a£a_Areas 

contains the format of the PUTLINE Parameter List and the PUTLINE 
Parameter Block. 

Processor Pat a n Table,, Sear ching^jIKJEBEPS) 

The processor data table search routine receives the address of a data 
set type keyword or the complemented address of a data set name 
qualifier as input in register 1. It compares the input with the first 
or second 8-byte field, respectively, in each table entry of the 
processor data table (IKJEBEPD) . The search routine returns control and 
the address of the table entry, if it is found, to the caller. SECTION 

5jl JDATA_AREAS contains the format and the associated data set type 

values of the processor data table. 
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BASIC_Renumbering._lIKJEBERNl 

This routine renumbers statements within a BASIC data set. When this 
routine receives control, Register 1 points to a two-word parameter 
list, that has the following format: 

Word 1 - pointer to the EDIT Communication Area (IKJEBECA) . 
Word 2 - pointer to a three-word parameter list, that has the following 
format: 

Word 1 - old line number at which to begin renumbering. 
Word 2 - new line number. 
Word 3 - increment. 

Starting at the given old line number, IKJEBERN constructs a table of 
old and corresponding new line numbers for the entire data set. Then, 
starting at the line number specified, IKJEBERN renumbers each record 
and changes all references to line numbers within the records to the 
corresponding new numbers. 

Strin£_Searchin3_J.IKJEBESE). 

The string search routine receives a pointer to the five-word parameter 
list (shown in Figure 16) as input. 
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Figure 16. IKJEBESE Input Parameter List 
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If the data set type is TEXT, the string search routine, in addition 
to searching a single record at a time, also searches for the specified 
character string across two records. If the string is found across two 
records, a return code of 4 is set. 

The string search routine places the second record (containing the 
final portion of the string into the buffer at the midpoint. When the 
specified string has been found, or when the data set has been exhausted 
of records, the string search routine returns control to its caller. 

BOTTOM Subcommand Processing 

The BOTTOM subcommand positions the current line pointer to the end of 
the utility data set. 

The BOTTOM subcommand processor: 

• Reads the last record in the utility data set. 

• Sets the current line pointer to the value of the key of the last 
record. 

• Returns control to the controller routine. 

BOTTOM_Processing 

This topic describes the way in which the BOTTOM subcommand processor 
operates. Table 6, which follows this topic, summarizes the operation 
of the BOTTOM subcommand processor. Upon receipt of the BOTTOM 
subcommand, the controller routine (IKJEBEMA) calls the command scan 
routine (IKJSCAN) to validate the subcommand. If the syntax is valid, 
IKJEBEMA invokes the BOTTOM subcommand processor (IKJEBEBO) . IKJEBEBO 
calls the interface routine for the EDIT Access Method (IKJEBEUT) to 
read the last record in the data set. (Reading of the last record of 
the data set is indicated by X'05' in the option code byte of the 
parameter list passed to IKJEBEUT.) IKJEBEUT branches to the read 
operation routine (IKJEBERR) which uses the record locate routine 
(IKJEBELO) to find the last record of the data set. If the data set is 
empty, indicated by a return code of 4 from IKJEEEUT, message number 
IKJ5250 1I is selected by the message selection routine (IKJEEEMS) and 
put out by IKJPUTI. IKJEBEBO sets the current line pointer to zero. If 
the data set is not empty (IKJEBEUT return code = 0) , IKJEBEBO sets the 
current line pointer to the key of the final record, turns the "line to 
be verified switch" on, and returns control to IKJEBEMA. 
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Table 6. Summary of BOTTOM Operations 
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| | | | Modules | | | 
1 I I I Involved | | | Flow 
| | | Keyword | in \ | MO | Chart 
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+ + f 4 f f 4 
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| | | | | (IKJEBEBO) . | | 

1 1 1 1 J „ _ L _ 1 


1 1 1 r • — 1 — " 1 — - 1 
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j | | | | BEAA. which locates the| | 
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CHANGE Subcommand Processing 

The CHANGE subcommand modifies a sequence of characters (a 
character-string) in a record or a range of records in the utility data 
set. IKJEBECH is the first load module of three load modules which 
process the CHANGE subcommand. IKJEBECH establishes program 
addressability and then calls IKJEBEUT to read the first record in the 
EDIT data set that has been specified by the user. If no character 
string has been specified as an operand of the CHANGE subcommand, 
IKJEBECH will issue appropriate messages until the user enters valid 
operands. If operands are specified (CAOPERND IN IKJEBECA is set to 
one) IKJEBECH calls IKJPARS to validate the operands. Upon return from 
IKJPARS, IKJEBECH analyzes the operands to determine where the change 
operation is to start, at a specified line number or at the current line 
pointer. The line count, i.e., number of records to be changed, is 
interpreted. Depending upon what operands the user specifies, the 
CHANGE subcommand processor replaces the first reference to the old 
string of data with a new string in 

• One record, if a line number or * were specified as an operand. 

• A range of records, if two line numbers or * line count were 
specified as operands. 

Additionally, the CHANGE subcommand processor provides for subsequent 
data insertion at a specified offset in a record if the user has 
specified a character count or one string of data as an operand. 

IHt§£E£§iiH3_2£§£^nd_Cgmbi nations 

The CHANGE subcommand processor interprets the combinations of operands 
the user can enter as follows: If * is specified with no numerical 
operands, IKJEBECH defaults the line count value to 1. If * is 
specified with one numerical operand, IKJEBECH assumes the operand is a 
character count and converts it to binary. If * is specified with more 
than one numerical operand, IKJEBECH converts both to binary and assumes 
the first numerical operand is a line count and the second is a 
character count. If only a single numerical operand is specified, 
IKJEBECH assumes it is a character count and defaults the line count 
value to 1. If a beginning line number has been specified, IKJEBECH 
converts it to binary. If two numerical operands are specified, 
IKJEBECH assumes the first operand is a line number and the second 
operand is a character count. If two numerical operands and a third 
operand are specified, IKJEBECH assumes the first operand to be a first 
line number and the second operand to be a second line number and 
executes a character count validity checking routine. IKJEBECH assumes 
the third operand is a character count and converts it to binary. 

After the CHANGE subcommand processor (IKJEBECH) has finished 
analyzing the operands, it calls IKJEBEUT to read the first specified 
record. If the specified record is not found but a range of records has 
been specified, IKJEBECH calls IKJEBEUT again to read the next record 
within the range. Processing continues as outlined in the section, 
EE2£essiiK[_CH A NGE_Oper ands . 

After the string has been changed, the CHANGE subcommand processor: 

• Sets the current line pointer to the value of the key of the last 
record changed. 

• Returns control to the controller routine. 
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Pr pees sing^CH A NGE_ Operands 

This topic describes the ways in which the CHANGE subcommand processor 
operates when various operands are specified. Table 7 , which follows 
this topic, summarizes the operations of the CHANGE subcommand 
processor. 

Strinc[_Data_S£ecif ied 

If string data is specified IKJEBECH invokes another load module of the 
CHANGE subcommand processor. IKJEBECG first calls the line editing 
routine IKJEBELE to translate tabulation characters to blanks and the 
specified string to upper case, if necessary. If only 'string 1' has 
been specified, another of the three load modules (IKJEBECN) that 
process the CHANGE subcommand is invoked. If both string 1 and string 2 
have been specified and "string 1" is null, the user has requested an 
insertion operation and the offset at which the change is to occur is 
set to position 1. The IKJEBECG manipulates the string data as follows: 

• If the offset at which the change is to occur is not position one, 
the data line up to, but not including, the specified offset is 
moved into a temporary buffer to be saved. 

• If 'string 2 f is not null, it is the replacement or insertion data 
and is moved into the temporary buffer next. 

• If there is data remaining after the change has been entered, it is 
moved into the temporary buffer. 

IKJEBECG calculates the new length of the data and then moves the new 
line back into the main buffer. IKJEBECG then calls IKJEBELE to line 
edit the data into a record. When IKJEBELE returns the record to 
IKJEBECG, IKJEBEUT is called to write the record into the data set. If 
line overflow occurs and the data set type is not NONUM TEXT (CANONUM 
bit is set to or CADSCODE field is not set to CATEXT) , IKJEBECG 
truncates the line and notifies the user. If line overflow occurs and 
the data set type is NOMUM TEXT (CANONUM bit is set to 1 and CADSCODE 
field is set to CATEXT) . IKJEBECG calls IKJEBELE to line edit the 
overflow into a record. When the record is returned, IKJEBECG invokes 
IKJEBEUT to write the record into the EDIT data set with an overflow 
key. If the data set type is BASIC or IPLI (CADSCODE field is set 
either to CABASIC or to CAIPLI) and the processor is in the system 
(CAPCHK field is not set to zero) , IKJEBECG updates the reverse Polish 
data set. The ITF entry code for input or replacement (CASXNCE2 field 
is set to B' 10000') for updating the data set. If the verification is 
specified (CAVRFYSW bit is set to 1) , the changed line and its overflow 
lines, if any, are passed to IKJEBEMS (the message output routine) . 
IKJEBECG continues processing until all specified records have been 
changed. It then sets the current line pointer to the last line changed 
or its last overflow line if one exists. IKJEBECG returns control to 
IKJEBEMA. 



Section 2: Method of Operation 65 



Character__Count_S£.ecif ied 

If a character count operation has been specified, IKJEBECN calls 
IKJPUTL to print out each record until the character count is reached or 
up to the string specified. After each record is printed, IKJEBECN 
calls IKJGETL to obtain the user's changes for the line from the 
terminal. IKJEBECN forms a new revised line by joining the IKJPUTL and 
IKJGETL buffers. It invokes IKJEBELE to format the revised line as a 
record. If line overflow occurs and the data set type is not NOMUM TEXT 

(CANONUM bit is set to or CASCODE field is not set to CATEXT) , 
IKJEBECN truncates the line and notifies the user. If line overflow 
occurs and the data set type is NONUM TEXT (CANONUM bit is set to 1 and 
CASCODE field is set to CATEXT) , IKJEBECN calls IKJEBELE to line edit 
the overflow into a record. When the record is returned, IKJEBECN 
invokes IKJEBEUT to write the record into the EDIT data set with an 
overflow key. If the data set type is BASIC or IPLI (CASCODE field is 
set either to CABASIC or CAIPLI) and the processor is in the system 

(CAPTCHK field is not set to zero) , IKJEBECN updates the reverse Polish 
data set. The ITF entry code for input or replacement (CASYNCD2 field 
is set to BMOQOO 1 ) for updating the data set. IKJEBECN continues 
processing until all specified records have been changed. It then sets 
the current line pointer to the last line changed or its last overflow 
line if one exists. IKJEBECN returns control to IKJEBEMA. 
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Table 7. Summary of CHANGE Operations (Part 2 of 2) 
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DELETE Subcommand Processing 

The DELETE subcommand removes one or more records from the utility data 
set. Upon receipt of the DELETE subcommand, the controller routine 
(IKJEBEMA) calls the command scan routine (IKJSCAN) to validate the 
subcommand. If the syntax is valid, IKJEBEMA invokes the DELETE 
subcommand processor (IKJEBEDE) . IKJEBEDE determines if operands are 
present by checking the status of the operand switch (CAOPERND in 
IKJEBECA) . If operands are present, IKJPARS is called to scan them. 
Depending upon what the user has specified, the DELETE subcommand 
processor: 

• Deletes the current record only, if "*" or no operands were 
specified. 

• Deletes a range of records, starting with the current record, if 
count were specified. 

• Deletes a range of records starting and ending with two specified 
line numbers, if a line number range were specified. 

After the specified records have been removed, the DELETE subcommand 
processor: 

• Sets the current line pointer to the value of the key (line number) 
of the record previous to the deleted record (s) . 

• Sets CALNTOVF to 1 and reads current line into location CATEMPBF+12. 

• Invokes the syntax checker to update the reverse Polish- notated data 
set, if the data set type is either BASIC or IPLI. 

Note: The topic Sxntax_Checkinc[ describes the use of the reverse 
Polish-notated data set. 

• Returns control to the controller routine. 

P£2cessing_DELETE_0£erands 

This topic describes the way in which the DELETE subcommand processor 
operates when particular operands are specified. Table 8, which follows 
this topic, summarizes the operations of the DELETE subcommand 
processor. 

"i "_°.£_.Mo_0£er an ds_ Specified 

If no operands are present or if * were entered in place of the 
subcommand or operand, IKJEBEDE calls the Access Method Interface 
routine (IKJEBEUT) to delete the current line. (Deleting of the current 

| line is indicated by XMO 1 in the option code byte of the parameter list 
passed to IKJEBEUT.) IKJEBEUT branches to the delete operation routine 
(IKJEBEDR) which uses the record locate routine (IKJEBELO) to find the 
current line and the record delete routine (IKJEBEDL) to delete it. 
After the current line is deleted IKJEBEDE calls IKJEBEUT again, this 
time to read the previous record. (Reading of the previous record is 

| indicated by X'01 1 in the option code byte of the parameter list passed 
to IKJEBEUT.) 
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f, Count; t _ - Specified 

If count were specified as the operand (for example, if DELETE * 10 was 
entered) , IKJEBEDE calls IKJEBEUT to delete the current line. After the 
current line is deleted IKJEBEDE calls IKJEBEUT again, this time to read 
the next line. If the required number of lines has not been deleted, 
this line is deleted and the next line in the data set is read. After 
the required number of lines has been deleted or the end of the data set 
is reached, IKJEBEDE calls IKJEBEUT again to read the previous line. 

Line Number^Range,. Specified 

If a range of lines were specified (for example, if DELETE 20 40 was 
entered) , IKJEBEDE calls IKJEBEUT to delete the first specified line, 
that is line 20. (Deleting of a particular line is indicated by XMO' 
in the option code byte and a record key value in the second word of the 
parameter list passed to IKJEBEUT.) After the specified line is 
deleted, IKJEBEDE calls IKJEBEUT again, this time to read the next line. 
The next line is then deleted. This operation, that is deleting lines 
one by one, is repeated until the required number of lines are deleted. 
IKJEBEUT is then called to read the previous line. The required number 
of lines have been read when: 

1. the last line of a specified range of lines has been deleted, or 

2. a line with a key value higher than the last line of the specified 
range has been read, or 

3. the last line of the data set has been deleted. 

After the required number of lines have been deleted and the previous 
line has been located, IKJEBEDE sets the current line pointer (CACURNUM 
in IKJEBECA) to the previous line. If the search for the previous line 
is unsuccessful, that is, there are no previous lines, the current line 
pointer is set to zero. IKJEBEDE calls IKJEBEUT to read the first 
record in the data set. (Reading of the first record of the data set is 
indicated by X'04 f in the option code byte of the parameter list passed 
to IKJEBEUT.) If no record is found, message number IKJ5250 1I is issued 
through IKJEBEMS. If a record is found, message IKJ52505I is issued. 

IlIIo]iill£-ths_Sxntax_Checker 

IKJEBEDE determines if the data set is BASIC/IPLI by examining the 
CADSCODE field (in IKJEBECA) . If the data set type is BASIC/IPLI and 
the appropriate syntax checker is available, IKJEBEDE invokes the syntax 
checker to delete lines from the reverse Polish data set. 
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DOWN Subcommand Processing 

The DOWN subcommand moves the current line pointer toward the end of the 
data set. The number of lines the line pointer will move is governed by 
the value in the operand of the DOWN subcommand; if no value is 
specified, the current line pointer will be moved one line toward the 
end of the data set. Upon receipt of the DOWN subcommand/ the 
controller routine (IKJEBEMA) calls the command scan routine (IKJSCAN) 
to validate the subcommand. If the syntax is valid, IKJEBEMA invokes 
the DOWN subcommand processor (IKJEBEDO) . IKJEBEDO determines if 
operands are present by checking the status of the operand switch 
(CAOPERND in IKJEBECA) . If operands are present, IKJPARS is called to 
scan them. 

Depending upon what the user has specified, the DOWN subcommand 
processor: 

• Reads records toward the end of the utility data set until the 
number of records specified by "count" have been read, if an operand 
were specified. 

• Reads the record following the record pointed to by the current line 
pointer, if no operand were specified. 

After the specified number of records have been read, the DOWN 
subcommand processor: 

• Sets the current line pointer to the value of the record last read. 

• Turns the line to be verified switch on. 

• Returns control to the controller routine. 

2Q!N— ££2c_essincj 

This topic describes the way in which the DOWN subcommand processor 
operates. Table 9, which follows this topic, summarizes the operation 
of the DOWN subcommand processor. If no operands are present, or after 
the operands have been validated, IKJEBEDO calls the interface routine 
for the EDIT Access Method (IKJEBEUT) to read the last record of the 
data set. (Reading of the last record of the data set is indicated by 
| X ! 05 f in the option code byte of the parameter list passed to IKJEBEUT). 
IKJEBEUT branches to the read operation routine (IKJEBERR) which uses 
the record locate routine (IKJEBELO) to find the last record of the data 
set. 

If the data set is empty, indicated by a return code of 4 from 
IKJEBEUT, message number IKJ52501I is selected by the message selection 
routine (IKJEBEMS) and put out by IKJPUTL. IKJEBEDO sets the current 
line pointer to zero and returns control to IKJEEEMA. If the data set 
is not empty (IKJEBEUT return code 0), IKJEBEDO calls IKJEBEUT again, 
this time to locate the record following the current record. (Reading 
| of the record following the current record is indicated by X f 02' in the 
option code byte of the parameter list passed to IKJEBEUT.) 

IKJEBEUT branches to the read operation routine (IKJEBERR) which uses 
the record locate routine (IKJEBELO) to find the next record. If the 
record cannot be found, message number IKJ52500I is selected by the 
message selection routine (IKJEBEMS) and put out by IKJPUTI. IKJEBEDO 
sets the current line pointer to the last record referred to, turns the 
line to be verified switch on, and returns control to IKJEBEMA. If the 
record is found, IKJEBEDO determines if the current line pointer has 
been moved down the requested number of lines. If the count operand 
value has not been satisfied, IKJEBEUT is called to read the next record 
in the data set. If the count has been satisfied, IKJEBEDO sets the 
current line pointer to the last record referred to. If this last 

I record is the last record in the data set, message number IKJ52500I is 
issued through IKJEBEMS. 
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END Subcommand Processing 

The END subcommand terminates the processing of the EDIT program. If 
the utility data set has been modified, and the user has not entered 
SAVE prior to entering END, the END subcommand processor issues message 
IKJ52555I and prompts the user to enter SAVE or END. If any thing other 
than SAVE or END is entered, the END subcommand processor returns 
control to the controller (IKJEBEMA) with a return code of zero. If 
SAVE is entered, the SAVE subcommand processor (IKJEBESA) is invoked. 
If END is entered, or after successful completion of SAVE, the END 
subcommand processor: 

• Invokes the Access Method termination routine (IKJEBEEX) to delete 
the Access Method (IKJEBEAA) and to free the utility data set. 

• Invokes the SCAN subcommand processor (IKJEBESC) to delete the 
syntax checker if it is in storage; (if the CASCANSW field in the 
EDIT Communication Area is set to 1, there is a syntax checker to be 
deleted) . 

• Deletes the message selection (IKJEBEMS) and the line edit 
(IKJEBELE) service routines. 

• Cancels the abnormal end exit routine (IKJEBEAE) via the STAE macro. 

• Cancels the attention exit routine (IKJEBEAT) via the STAX macro. 

• Returns control to the EDIT controller routine (IKJEBEMA) . 

The controller routine, upon receiving control from the END 
subcommand processor, returns to the Terminal Monitor Program by issuing 
SVC 3. Table 10, which follows, summarizes the operations of the END 
subcommand processor. 
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FIND Subcommand Processing 

The FIND subcommand locates a particular character string in the utility 
data set. Upon receipt of the FIND subcommand, the controller routine 
(IKJEBEMA) calls the command scan routine (IKJSCAN) to validate the 
subcommand. If the syntax is valid, IKJEBEMA invokes the FIND 
subcommand processor (IKJEBEFI) • Depending upon what the user has 
specified, the FIND subcommand processor: 

• Locates a character string in the utility data set and returns a 
pointer to it, if the character string is specified. 

• Refers to a character string in the CAFIBFR field of the EDIT 
Communication Area, locates the same string in the utility data set 
and returns a pointer to it, if a character string is not specified 
for a second use of FIND. (The character string in the CAFIBFR 
field was inserted during the previous use of FIND.) 

• Prompts the user (thru IKJPARS) for a character string, if a 
character string is not specified for the first use of FIND. 

• Locates a character string at an offset from the beginning of a 
record and returns a pointer to it, if "count" and a character 
string were specified. 

Prior to searching for the specified string, the FIND subcommand 
processor determines if this is the first use of the subcommand for this 
EDIT session. (Note: The fields mentioned below are in the EDIT 
Communication area.) 

• If this is the first use of FIND (CAFINDIS=0) and no string was 
entered (CAOPERND=0) the FIND subcommand invokes IKJPARS to prompt 
the user for the character string. 

• If this is the first use of FIND and a string was entered 

I(CA0PERND=1) , the FIND subcommand invokes IKJPARS to scan and 
validate the operand, and the line edit routine (IKJEBELE) to 
translate the character string. 

• If this is not the first use of FIND (CAFINDIS=1) and no string was 
entered, the FIND subcommand refers to the CAFIBFR field where the 
string used during the previous FIND operation is stored. 

After the specified string is found and saved, the FIND subcommand 
processor returns control to the controller routine. 

mN£_E£°_cessinG[ 

This topic describes the way in which the FIND subcommand processor 
operates after it determines if the user has previously specified FIND 
and a string and enters FIND with no operands. Table 11, which follows 
this topic, summarizes the operations of the FIND subcommand processor. 
IKJEBEFI calls the Access Method interface routine (IKJEBEDT) to read 
the record following the current record. (Reading of the record after 

| the current record is indicated by X'02 1 in the option code byte of the 
parameter list passed to IKJEBEUT.) IKJEBEUT branches to the read 
operation routine (IKJEBERR) which uses the record locate routine 
(IKJEBELO) to find the current record. If no offsets were specified by 
the user IKJEBEFI invokes the string search routine (IKJEBESE) to scan 
the records for the specified character string. After IKJEBESE has 
scanned the current record, if the data set type is not TEXT, IKJEBESE 
continues scanning the records one by one. If the data set type is 
TEXT, IKJEBESE calls IKJEBEUT to read the next line. (Reading of the 

| next line is indicated by X , 02' in the option code byte of the parameter 
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list passed to IKJEBEUT.) After the next line has been read IKJEBESE 
scans both lines (current line and following line) for the specified 
text. If the text is found across the two lines IKJEBESE returns to 
IKJEBEFI with a special indication (a return code of 04) . If the string 
has not been found, IKJEBESE calls IKJEBEUT to read the next line. 
After this line is read IKJEBESE scans it. IKJEBESE returns to IKJEBEFI 
when the rest of the data set has been completely searched in this 
manner (IKJEBEUT returns an indication that no more lines exist) or when 
the specified character string has been found. When IKJEBEFI receives 
control back from IKJEBESE, it notifies the user if the specified 
character string was not found by issuing message IKJ52506I via the 
message selection routine (IKJEBEMS) . If the text was found, IKJEEEFI 
updates the current line pointer to the line number of the specified 
text. In all cases CAFINDIS (in IKJEBECA) is set to 1 . If offset is 
specified, IKJEBEFI scans each record, starting at the current record, 
at the specified offset only; no search across boundaries is done for 
TEXT data sets. 
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Table 11. 
r 



Summary of FIND Operations (Part 1 of 2) 



- T 1 

| Flow 
I Chart! 
ID 

-+ ^ 

ICW-CYI 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 
in 
Processing 



Functional 
Description 



MO 
ID 



FIND 



string 



None 



None 



IKJEBEMA 



Receives subcommand from 
command buffer; invokes 
subcommand processor 
(IKJEEEFI) . 



02 



IKJEBEFI 



Invoices the Access Method 
to read the current reco- 
rd; invokes IKJEBESE to 
find the string; IKJEBEFI 
notifies the user when the 
string is found by setting 
the current line pointer 
to the value of the key of 
record which contains the 
string. 



09 



BT 



IKJEBELE 



IKJEBEUT 



-4 1 

CO 



IKJEEESE 



|. 

FIND 



+ 

string 
count 






None 



None 



IKJEBEMA 



Translates lower case to 
uppercase, if necessary, 
and substitutes single 
blanks for tab characters. 

Acts as interface to IKJE- | 27 | ET 
EEAA which reads the cur- 
rent record and each suc- 
ceeding record until the 
specified string is found 
cr the data set has been 
completely searched. 

Invokes the Access Method j — 1 EH 
to read each record in the 
data set, starting at the 
record following the cur- 
rent line, scans each 
record read by the Access 
Method for the specified 
address of string; passes 
string and key cf record 
containing string to 
IKJEEEFI. 

Same function as above. I 02 ICW-CY 



IKJEEEEI 



IKJEEELE 
IKJEBEUT 



Invokes the Access Method) C9 | BT 
to read each record in the 
data set, starting at the 
current line, until the 
specified string is found; 
searches for the string at 
a specified offset (count) 
within each record; IKJE- 
EEEI notifies the user 
when the string is found 
by setting the current 
line pointer to the key of 
the record which contains 
the string. 

Same function as above. | — jCO 

Same function as above. J 27 | ET 

j i j 

(Part 1 of 2) 
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Table 11. Summary of FIND Operations (Part 2 
r T T T T 
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2) 



| | | | Modules | | | 
1 1| | | Involved | | |Flow 
j | | Keyword | in | Functional | MO | Chart 
Subcommand (Operand j Keyword |Value (Processing | Description 1 ID | ID 
+ + + 4 4 4 4 

FIND |None | None | None ( IKJEBEMA. | Same function as above. | 02 |CW-CY 
j | i i _ _ j i _ __. 


| | | | IKJEEEEI | If first use of FIND, pro- | C9 | BT 
I I I I | mpts for operands; if not| | 
j | | | | first use, determines str- | | 
j | | | | ing to be found and count | | 
I I I I lvalue from CAFIEFR; pro- | | 
till | ceeds as above, starting | | 
j | | | |at record following the| | 
j | | | | current record. | | 

I | 1 1- ■ — J - - — _^r - J J -. 


1 1 1 r 1 ^ 1 1 

| | | | IKJEEEUT | Same function as above. | 27 | ET 
| | | v + 4 4 

| | | | IKJEBESE | Same function as above. | — | EH 

JL X JL J 4 J J 
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FORMAT Subcommand Processing 

The FORMAT subcommand lists the utility data set, or any part of the 
data set, in a user-defined format. Upon receipt of the FORMAT 
subcommand, the controller routine (IKJEBEMA) calls the command scan 
routine (IKJSCAN) to validate the subcommand. If the subcommand is 
valid, IKJEBEMA invokes the FORMAT subcommand processor (IKJEBEFO) . 
IKJEBEFO determines if operands are present by checking the status of 
the operand switch (CAOPERND in IKJEBECA) . If operands are present, 
IKJEBEFO calls IKJPARS to scan them. The FORMAT subcommand processor 
invokes the FORMAT command (a Program Product) through the command 
invoker (IKJEBECI) . The FORMAT command processor interprets the format 
control words in the text entered by the user and performs the required 
formatting operation. See the Program Product publication, IBM 
System/360 Operating System Time^ Sharing, Option : Tgp_ Data Utilities; 
Copy x _Fo r ma t^_Lis t ^_Mer <je_ Us e r ls__G ui d e_an d_Refer en ce_ Manual for a 
description of the use and function of the format control words. 
Depending upon what the user has specified, the FORMAT subcommand 
processor invokes the TSO FORMAT command processor to: 

• Format a range of records, if an n *" or a line number were 
specified. 

• Format the entire data set, if no operands were specified. 

When the TSO FORMAT command processor has completed processing, it 
returns control to IKJEBECI, which then returns control to the FORMAT 
subcommand processor. The FORMAT subcommand processor: 

• Frees the Format data set. 

• Returns control to the controller routine. 

Processing^FOR MAT ..Operands 

This topic describes the way in which the FORMAT subcommand processor 
operates when operands are specified. (The Program Product publication, 

TSO., Data, Utilities: Copy, Format, List 4 Merge User *s guide_and 

gg|g££fl£. e ._ Manual describes the particulars of the FORMAT subcommand 
operands; the licensed Program Product publication, TSO Data Utilities: 
Q221^^K2EE^jL^LX^jL^^L^^2L23iL^E^L9.3.XQ,^^Ik}l§il: describes the internal 
logic of the TSO FORMAT command processor.) Table 12, which follows 
this topic, summarizes the operations of the FORMAT subcommand 
processor. 

Li ne_N umber ^Specified 

After the operands have been validated, IKJEBEFO checks if the first 
operand is *. If the first operand is a line number and not *, IKJEBEFO 
builds a model FORMAT command (including the range of data set lines 
specified as operands of the FORMAT subcommand) and calls the data set 
allocation routine (IKJEBEDA) . IKJEBEDA builds a DSNAME and invokes 
IKJDAIR to allocate a data set with a disposition of NEW/DELETE/DELETE. 
When the data set has been allocated, IKJEBEDA returns to IKJEBEFO. 
IKJEBEFO calls the final copy routine (IKJEBEFC) to write the contents 
of the utility data set into the allocated data set. After the copy 
operation is completed, IKJEBEFO calls IKJEBEDA via LINK to mark the DSE 
as not in use and calls the command invoker (IKJEBECI) via LINK. The 
command invoker, in turn, passes control to the TSO FORMAT command via 
ATTACH. The FORMAT command formats the lines specified in the command 
model. Upon return from IKJEBECI, IKJEBEDA is invoked to free the data 
set. 
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J*! 1 ., Specified; .Unn umb ered, Data^Set 

If the first operand is * and the data set is not line numbered/ 
IKJEBEFO calls IKJEBEUT to read the first record of the data set and 
each succeeding line until the current line (*) is read. By assigning a 
value to each line, IKJEBEFO is able to give the current line a relative 
line number, IKJEBEFO builds the FORMAT command model, inserting the 
relative line values. IKJEBEFO then calls IKJEBEDA to allocate a data 
set, IKJEBEFC to copy the utility data set into the new data set, 
IKJEBEDA to mark the DSE as not in use, and IKJEBECI to invoke the TSO 
FORMAT command. The FORMAT command formats the lines specified in the 
command model. Upon return from IKJEBECI, the data set is freed. 

"1 "..Specif iedi_Numbered_Data_Set 

If the first operand is * and the data set is line numbered, IKJEBEFO 
calls IKJEBEUT to read the current line and each succeeding line until 
the count (FORMAT * 10) has been satisfied. The number of the last line 
read by IKJEBEUT is inserted by IKJEBEFO into the command model. 
IKJEBEFO then calls IKJEBEDA to allocate a data set, IKJEBEFC to copy 
the utility data set into the new data set, IKJEBEDA to mark the DSE as 
not in use, and IKJEBECI to invoke the TSO FORMAT command. The FORMAT 
command formats the lines specified in the command model. Upon return 
from IKJEBECI, the data set is freed. 

No^Operand Specified 

If no operands are present, IKJEBEFO builds the FORMAT command model, 
specifying that the entire data set is to be formatted. IKJEBEFO then 
calls IKJEBEDA to allocate a data set, IKJEBEFC to copy the utility data 
set into the new data set, IKJEBEDA to mark the DSE as not in use, and 
IKJEBECI to invoke the TSO FORMAT command. The FORMAT command formats 
the lines specified (the entire data set) in the command model. Upon 
return from IKJEBECI, the data set is freed. 
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Table 12. 
r 



Summary of FORMAT 

"T T 



Operations 

~T T" 



"T 1 

Flow 
Chart | 
ID 

4 ^ 

CW-CYI 



Subcommand 
FORMAT 



I 
Operand | Keyword 

(Refer to the 
Program Product 
publication, 
TSQ Data 

Utilities; COPY, 
FORMAT, LIST„ 
MERGE) for 
particulars. 



IKJEBEMA 



Keyword 
Value 



Modules 
Involved 
in 
Processing 



Functional Description 

Receives subcommand from 
command buffer, invokes 
subcommand processor 
(IKJEEEFO) . 



IKJEBEFO 



IKJEEEDA 



IKJEBEFC 



IKJEEECI 



TSC 

FORMAT 

Command 



MO 
ID 

4 

02 



Creates relative line num- 
bers fcr unnumbered data 
sets; invokes the EDIT 
data set a 1 location /free 
service routine (IKJEBEDA) 
to obtain a Format data 
set; invokes the final 
copy EDIT service routine 
(IKJEBEFC) to copy the 
contents of the utility 
data set into the Format 
data set; invokes IKJEBEDA 
to mark the DSE as not in 
use; builds a model FORMAT 
command and invokes the 
command invoker (IKJEEECI) 
to pass control to the TSO 
FORMAT command processor 
(a program product) ; 
invokes IKJEEEDA tc free 
the Format data set. 



Euilds a DSNAME and 
invokes the TSO data set 
allocation service routine 
(IKJDAIR) to allocate and 
tc free the Format data 
set and to nark the DSE as 
not in use. 



Invokes the Access Method 
to find and to read into 
storage every record in 
the data set; transforms 
the records into QSAM for- 
mat; invokes the Access 
Method to write the reco- 
rds into the Format data 
set. 



Passes control to the TSO 
FORMAT command processor 
via Attach with model com- 
mand as input; returns 
control to IKJEEEFO when 
the FORMAT command proces- 
sor has completed 
processing. 

Formats records in the 
Format data set, as 
specified in the model 
command. 



10 



-+ 1 

|BU,BV| 



-f 1 

AX 



-4 i 

| BR, BSJ 



-f 1 

|AO,AP| 



f 1 
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HELP Subcommand Processing 

The HELP subcommand provides explanations of the use of the EDIT 
subcommands. Upon receipt of the HELP subcommand, the controller 
routine (IKJEBEMA) invokes the HELP/PROFILE subcommand processor 
(IKJEBEHE) . IKJEBEHE sets the third and fourth bytes of the subcommand 
buffer (the offset field) to zero so that IKJSCAN can be invoked to scan 
the buffer. IKJEBEHE builds a two-word parameter list which contains 
pointers to the EDIT Communication Area (IKJEBECA) and to the subcommand 
buffer. IKJEBEHE passes control (via XCTL) to the command invoker 
(IKJEBECI) . The command invoker, in turn, passes control to the TSO 
HELP command via ATTACH. (See the publication IBM System/360 Operating 
Sxstem_Time_Sharin3_0ption_Com 

IV for a description of the internal logic of the HELP command 
processor.) When the system HELP command has completed processing, 
IKJEBECI receives control and returns to IKJEBEMA. Table 13, which 
follows, summarizes the operations of the HELP subcommand processor. 
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Table 13, 
r 



Summary of HELP Operations 
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Subcommand 



HELP 
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Operand 
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Sub- 
command 



Keyword 



FUNCTION 

or 

SYNTAX 

or 

OPERANDS 
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Keyword 
Value 



None 



IKJEEENA 



IKJEEEEE 



IKJEEECI 



TSO HELP 
Command 



Functional Description 



Receives subcommand from 
command buffer; invokes 
subcommand processor 
(IKJEBEHE). 



Euilds a parameter list 
and invokes the Command 
Invoker to attach the TSO 
HELP command. 



Attaches the HELP command. 



Describes the function, 
syntax, or operands appl- 
icable to the specified 
subcommand. 



MO 
ID 



C2 



11 



-f i 

Btf 



|AO,AP| 



H 



HELP 



None 



None 



None 



IKJEBEMA 



Same function as above. 



IKJEEEEE 



Same function as above. 



02 
11 



IKJEBECI 



Same function as above. 



TSC HELP 
Command 



Eisplays a list cf all 
the EDIT subcommands. 



ICW-CYI 



Btf 
| AO f AP 



HELP 



EDIT 
sub- 
command 



ALL 



None 



IKJEEEMA 
IKJEBEHE 



Same function as above. 



Same function as above. 



C2 
11 



IKJEEECI 



Same function as above. 



TSO HELP 
Command 



Describes the function, 
syntax, and operands appl- 
icable to the specified 
subcommand. 



I CW-CY I 
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INPUT Subcommand Processing 

The INPUT subcommand establishes the Input mode for the EDIT program; 
the INPUT subcommand processor writes subsequent terminal input into the 
utility data set. The controller routine (IKJEBEMA) invokes the INPUT 
subcommand processor (IKJEBEIP and IKJEBEIM) under the following 
conditions: 

1. The user entered the INPUT subcommand. 

2. The user entered the INSERT subcommand with no operands. 

3. The user entered a null line while in Edit mode. 

4. The Input mode was initially entered because the data set was new, 
or old and empty. 

Depending upon what the user has specified, the INPUT subcommand 
processor: 

• Writes records into the utility data set beginning at the first 
line, if the data set is new, or old and empty. 

• Writes records into the utility data set beginning at the line 
specified, if the INPUT subcommand and an operand were entered. 

• Writes records into the utility data set beginning at the line 
following the one pointed to by the current line pointer, if the 
INSERT subcommand with no operands were specified. 

• Writes records into the utility data set beginning at the line 
following where the previous Input mode operation ceased, if a null 
line were entered while in Edit mode. 

• Writes records into the utility data set beginning at the line 
following the last existing record in the data set, if the INPUT 
subcommand and no operands were specified. 

After the INPUT subcommand processor determines which line is to receive 
the input record, it checks to see if there is room for the new record. 

• If there is no room for the new record and the data set is 
line-numbered, IKJEBEIM issues message IKJ52400I via the message 
selection routine (IKJEBEMS) and returns control to IKJEBEMA. 

• If there is no room for the new record and the data set is not 
line-numbered, IKJEBEIM rewrites all displaced lines with their 
original keys incremented by 1 . 

Prior to inserting the new record, the INPUT subcommand processor 
determines whether the appropriate syntax checker is available, if the 
input is to be scanned for syntax errors (the CASCANSW field in the Edit 
Communication Area is set to 1) . 

• If the data set is PLI, BASIC, IPLI, FORTRAN (E,G,H,GI) or GOFORT, 
IKJEBEIM invokes the appropriate syntax checker which scans the 
input records. 

• If a syntax checker detects an error in an input record, the record 
is inserted into the data set. IKJEBEIM notifies the user by 
issuing an error message, and returns control to the controller 
routine. (The controller will then invoke the Edit mode, thereby 
allowing the user to correct the syntax error by altering the 
statement just entered.) 
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After all input records have been inserted, the INPUT subcommand 
processor: 

• Sets the current line pointer to the value of the key of the last 
record written into the utility data set. 

• Eeturns control to the controller routine, 

INPUT_Processing 

This topic describes the way in which the INPUT subcommand processor 
operates after it is invoked by the controller routine. Table 14, which 
follows this topic, summarizes the operations of the INPUT subcommand 
processor. 

IN PUT ...Subcommand, ,and_Oper ands... Specified 

If the INPUT subcommand were entered, IKJEBEIP determines if operands 
are present by checking the status of CAOPRND (in IKJEBECA) , If 
operands are present, IKJEBEIP calls IKJPARS to scan them. If no 
operands are present the defaults are used. After the operands have 
been validated, IKJEBEIP invokes the second load of Input (IKJEBEIM) via 
the XCTL macro instruction. IKJEBEIM invokes the access method 
interface routine (IKJEBEUT) to write each input record into the data 
set beginning at the line specified. (Writing of a record is indicated 
by X^O 1 in the option code byte and a pointer to the line in the data 
in the second word of the parameter bit passed to IKJEBEUT.) IKJEBEUT 
branches to the write operation routine (IKJEBEWR) which uses the record 
locate routine (IKJEBELO) to find the specified line and the move 
routine (IKJEBEMV) to insert the new record into the found line. If R 
were specified as an operand for the INPUT subcommand, IKJEBEWR also 
uses the record delete routine (IKJEBEDL) to delete any records found in 
lines specified for new records. 

IN PUT_Subcommand_ an d_No__ Operands^ Specified 

If the INPUT subcommand were entered and no operands were specified, 
IKJEBEIP invokes IKJEBEUT to obtain the last line in the data set. 
(Reading of the last line in the data set is indicated by X'OS 1 in the 
option code byte of the parameter list passed to IKJEBEUT.) IKJEBEUT 
branches to the read operation routine (IKJEBERR) which uses IKJEBELO to 
locate the line. After the last line of the data set has been found, 
IKJEBEIP invokes the second load of INPUT (IKJEBEIM) via the XCTL macro 
instruction. IKJEBEIM calls IKJEBEUT to write the input records into 
the data set beginning at the line following the last line. If the data 
set is line-numbered, the line number assigned to the first new record 
will be that of the last record plus the increment specified in the 
INPUT subcommand on the default value. 

IiJSERT_Subcommand an,d_, No Operands .Specified 

If the INSERT subcommand with no operands were entered, IKJEBEIP invokes 
the second load of INPUT (IKJEBEIM) via the XCTL macro instruction. 
IKJEBEIM invokes IKJEBEUT to insert the new record into the line 
following the current line. If the data set is line-numbered, the new 
record will be given a line number 1 greater than the current line. 
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Null Line^ Entered j in _ Edit, Mode 

If a null line was entered while in Edit mode, IKJEBEMA invokes the 
Input mode. Records will be entered into the data set beginning at the 
line following where the previous Input mode operation ceased. IKJEBEIP 
determines the last line number generated by the previous Input mode 
operation by checking CAIMLLNO (in IKJEBECA) , and invokes the second 
load of INPUT (IKJEBEIM) via the XCTL macro instruction. IKJEEEIM 
invokes the access method to write the input records into the data set. 
If Input mode were not previously used, the first new record will be 
inserted at the last line of the data set plus the last used increment. 

Egl£ty. pata_§et_ i iData„Set_is_New A _or_Old_and_EmEtYl. 

If the data set is empty, IKJEBEMA establishes the Input mode by calling 
IKJEBEIP, which invokes the second load of INPUT (IKJEBEIM) via the XCTL 
macro instruction. IKJEBEIM invokes the access method to insert the new 
records. The first record inserted will have a line number of 10; each 
succeeding line number will be incremented by 10. 
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IKJEBEMA 



Receives subcommand from 
buffer, invokes the sub- 
command processor (IKJE- 
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terminal input as data. 



02 



IKJEEEIP 



Processes operands to 
determine starting line 
for data insertion; speci- 
fies that new records will 
have line numbers incre- 
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in the data set with a 
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Of INPUT (IKJEBEIM). 
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IKJEEEIM 



Invokes Access Method to 
replace any record exist- 
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Access Method to write 
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quent terminal input; 
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Table 14. Summary of INPUT Operations (Part 2 of 



5) 
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FlOW 

Chart 
ID 



H 



INPUT 



I 
PROMPT 



None 



IKJEBEMA 



Same function as above. 



02 



IKJEEEIF 



Processes operands to 
determine starting line 
for data insertion; speci- 
fies that new records will 
have line numbers incre- 
mented by the last incre- 
ment used and that the 
terminal will display a 
prompting character before 
each input line; invokes 
the Access Method to loc- 
ate the current line; 
invokes the second lead of 
INPUT (IKJEBEIM). 



12 



IKJEEEIM 



Invokes the Access Method 
to insert the subsequent 
data into the line, if it 
is empty, or after the 
line, if it is net empty; 
returns to IKJEBEMA. 



12 



IKJEEEUT 



Acts as interface to IKJE- 
BEAk which reads the cur- 
rent record to locate the 
position in the data set 
at which new records are 
to be added; writes new 
records into the data set. 



27 



h 



CW-CY 



CK,CL 



+ 1 

BX-CB 



f A 

ET 



4 1 

CW-CY 
1 

CK,CL 



iNPur 



None 



None 



None 



IKJEBEMA 



Save function as above. 



02 



IKJEEEIF 



Determines that the last 
record in the data set is 
to be located; invokes the 
Access Method to locate 
the last record in the 
data set; invokes the 
secend load cf INPUT 
(IKJEBEIM) . 



12 



IKJEEEIM 



Invokes the Access Method 
to write into the data set 
the subsequent data from 
the terminal; returns to 
IKJEEEMA. 



12 



IKJEBEUT 



Acts as interface to IKJE- 
EEAA which reads the last 
record in the data set; 
writes new records into 
the data set. 



27 



f 1 

BY-CB 



4 ^ 

ET 
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Table 1<*. 
r 



Summary of INPUT Operations (Part 3 of 5) 



~T r l 



Flow 
Chart 
ID 

+ 1 

CW-CY 



Subcommand 

Input not 
entered? 
data set 
is NEW or 
OLD and 
empty. 






Operand 



None 



Keyword 



None 



Keyword 
Value 



None 



Modules 

Involved 

in 

Processing 



IKJEEE1YA 



IKJEEEIF 



h 



IKJEBEIM 



IKJEEEUT 



Functional Description 



Receives indication from 
initialization (IKJEEEIN) 
that data set is NEW or 
CLE and empty; sets the 
INPUT irode by invoking 
the INPUT subcommand pro- 
cessor (IKJEBEIP). 



Eeterirines that the first 
line in the empty data set 
is tc be located, speci- 
fies 10 as the first line 
number and 10 as the 
increment for each suc- 
ceeding line number; 
invokes the second load of 
INPUT CIKJEBEIM) • 



Invokes the Access Method j 
to ircve subsequent data| 
from the terminal into the | 
first line of the data| 
set; returns to IKJEBEMA. 

Acts as interface to IKJE-j 
BEAA which writes new| 
records into the utility! 
data set. 



MO 
ID 



C2 



12 



+ i 

CK,CL 



12 



27 



i 1 

BX-CB 



f 1 

et 
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Table 1U. Summary of INPUT Operations (Part 4 of 5) 

r T --T T T T 



I- 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 

in 
ProcessingFunctional Description 



MO 
ID 



Flow 
Chart 
ID 



INPUT not 
entered; a 
null line 
is entered 
while in 
Edit mode 



None 



None 



None 



I 



IKJEEENA | Sets the | C2 

Input mode by invoking 
the INPUT subcommand 
processor (IKJEEEIP) . 

IKJEEEIP lEeterirines that the last| 12 
record is to be located, 
if INPUT has net beenl 
entered before in this | 
EEIT session; determines] 
that the record following 
the last record entered | 
during the previous Input | 
irode operation is to fce | 
located, if Input has been) 
entered before; specifies! 
that the line increment be | 
the default value, cr the| 
value last used if Input) 
ir.ode were used previously! 
in this EDIT session; 
invokes the Access Method! 
to locate the specified | 
record; invokes the second | 
load of INPUT (IKJEBEIM), 

IKJEEEIM | Invokes the Access Method | 12 
to write the subsequent] 
data into the data set; 
returns to IKJEBEMA. 

| IKJEEEUT | Acts as interface to IKJE-| 27 
BEAA. which reads and] 
writes records intc the| 
utility data set. 



CW-CY 



f ^ 

CK,CL 



+ 1 

BX-CB 



f 1 

ET 



»J J 
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Table 14. Summary of INPUT Operations (Part 5 of 5) 
r T T T T T — 

Modules 



- T 1 

| Flow 
| Chart | 
ID 

-4 -I 

ICW-CYI 



Subcommand 

INPUT not 

entered; 

INSERT 

with no 

operands 

entered. 



Operand 






None 



Keyword 



None 



Keyword 
Value 



None 



h 



Involved 

in 

Processing 



IKJEBEMA 



t- 



IKJEBEUT 



Functional Descripticn 



Receives subcommand from 
INSERT subcommand 
processor ( IKJEEEIS) 
invokes the INPUT 
subcommand processor 
(IKJEBEIP); treats subse- 
quent terminal input as 
data. 



IKJEEEIP |Eeterirines that the cur- 1 12 
rent record is to be| 
located; specifies that| 
the new record will have a| 
line number of 1 greater | 
than the current record; 
invokes the Access Method) 
to locate the current) 
record; invokes the second | 
load of INPUT (IKJEBEIM). 

IKJEEEIM llnvckes the Access Method | 12 
to write a new record | 
immediately after the cur-| 
rent record; returns to| 
IKJEEEMA. 



Acts as interface to IKJE- 
EEAA which locates the 
current line and moves 
subsequent data into a new 
line following the current 
link. 



MO 
ID 



02 



-f ^ 

|CK,CL| 



-f 1 

1 BX-CB I 



27 



ET 
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INSERT Subcommand Processing 



The INSERT subcommand writes one or more records into the utility data 
set immediately following the record pointed to by the current line 
pointer. Upon receipt of the INSERT subcommand, the controller routine 
(IKJEBEMA) calls the command scan routine (IKJSCAN) to validate the 
subcommand. If the syntax is valid, IKJEBEMA invokes the INSERT 
subcommand processor (IKJEBEIS) . Depending upon what the user has 
specified, the INSERT subcommand processor: 

• Returns control to the controller routine, which invokes the INPUT 
subcommand, if no operands were specified. 

• Writes data into the record following the current record, if "text" 
were specified. 

If the data set is line-numbered, the INSERT subcommand processor 
either: 

• Creates a new record using the next key value, or 

• Terminates if the next key value already exists. 

If the data set is unnumbered, the INSERT subcommand processor: 

• If necessary, "pushes down" record keys following the current record 
to make room for the record to be inserted. 

• Creates a new record with a key of one greater than the current 
record. 

After the text has been inserted, the INSERT subcommand processor: 

• Sets the current line pointer to the value of the key of the last 
record inserted. 

• Returns control to the controller routine. 

Processing INSERT, Operands 

This topic describes the way in which the INSERT subcommand processor 
operates when operands are specified or not specified. Table 15, which 
follows this topic, summarizes the operations of the INSERT subcommand 
processor . 

No Operands, Specified 

If no operands are present, IKJEBEIS returns control to IKJEBEMA with a 
return code of 4. IKJEBEMA then calls the INPUT subcommand processor 
(IKJEBEIP and IKJEBEIM) to write the lines of input into the data set. 
Writing into the data set begins at the line following the current line. 
IKJEBEIM returns control to IKJEBEMA. (See the topic "INPUT Subcommand 
Processing" for a description of subsequent processing.) 
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0£§£^li5§— S£ecif ied 

If an operand is specified (INSERT text) IKJEBEIS calls the Access 
Method interface routine (IKJEBEUT) to read the next line. (Reading of 

| the next line is indicated by X f 02' in the option code byte of the 
parameter list passed to IKJEBEUT.) IKJEBEUT branches to the read 
operation routine. (IKJEBERR) which uses the record locate (IKJEBELO) 
to find the next line in the data set. After the next line has been 
located, IKJEBEIS determines if it is empty by checking the return code 
from IKJEBEUT. (A return code of 4 indicates an empty line.) If the 
next line in the data set is empty IKJEBEIS calls IKJEBEUT again, this 
time to write the input record (text) into the data set. Writing of the 

1 record is indicated by X f 20' in the option code byte and a pointer to 
the line in the data set (the line following the current line) in the 
second word of the parameter list passed to IKJEBEUT. IKJEBEUT branches 
to the write operation routine (IKJEBEWR) which uses the move routine 
(IKJEBEMV) to insert the new record into the data set. IKJEBEIS sets 
the current line pointer to the record inserted. If the next line in 
the data set is not empty and the data set is not line-numbered, 
IKJEBEIS calls IKJEBEUT to write the input record into the data set. 
IKJEBEUT branches to IKJEBEWR which uses IKJEBEMV to insert the new 
record into the data set. Prior to writing of the new record, records 
with higher keys are displaced to make room for the record to be 
inserted. 
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Table 15. Summary of INSERT Operations 
r t t t T" 



~r t 

FlOW 

Chart 
ID 



h 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



-h- 



Modules 
Involved 
in 
Processing 



Functional Description 



MO 
ID 



H 



INSERT 



None 



None 



None 



IKJEBEMA 



Receives subcommand from 
command buffer; invokes 
INSERT subcommand proces- 
sor (IKJEEEIS). 



02 



IKJEBEIS 



Returns to IKJEBEMA. (See 
INPUT subcommand 

processing) . 



13 



CW-CY 



4 -I 

CM, CN 



f 1 

CW-CY 



INSERT 



data 



None 



None 



IKJEEEMA 



Receives subcommand from 
command buffer; invokes 
INSERT subcommand proces- 
sor (IKJEBEIS). 



C2 



IKJEEEIS 



Invokes the Access Method 
to locate the line follow- 
ing the one pointed to ty 
the current line pointer 
and tc move the data into 
it. 



13 



IKJEEEUT 



Acts as interface to IKJE- 
BEAA which locates the 
line following the current 
line and moves the input 
data (indicated by the 
operand 'data') into the 
found line. 

IKJEEE2A which locates the 
current line and moves 
subsequent data into a new 
line following the current 
line. 



27 



f 1 

CM,CN 



f 1 

ET 
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Line Insert/Replace/Delete Processing 

The Line Insert/Replace/Delete function is an implicit subcommand 
function which inserts, replaces, and deletes particular records in the 
utility data set. (Note: This subcommand is invoked when the required 
operand is entered. There is no subcommand name or designation to be 
entered by the user.) Upon receipt of a number or * as the first 
character of input while in the Edit mode, the controller routine 
(IKJEBEMA) invokes the Line Insert/Replace/Delete processor (IKJEBELI) . 
Depending upon what the user has specified, the Insert/Replace/Delete 
subcommand processor: 

• Deletes a single record, if an "*" or a line number were entered. 

• Inserts a single record, if a line number, followed by text, is 
specified, and if the existing record on the utility data set is 
empty. 

• Replaces an existing record with a new record, if a line number, 
followed by text (the new record) , is specified, and if the existing 
record on the utility data set is not empty. 

After the specified record has been deleted, or after the specified line 
has received the new record, the Line Insert/Replace/Delete subcommand 
processor: 

• Sets the current line pointer. 

• Returns control to the controller routine. 

££ocessing_Line_Insert/^ 

This topic describes the way in which the Line Insert/Replace/Delete 
subcommand processor operates when particular operands are specified. 
Table 16, which follows this topic, summarizes the operations of the 
Line Insert/Replace/Delete subcommand processor. 

"i"_2£_LiHe__lMJ}££_S£ecif ied 

If only a required operand is entered, the specified line is deleted. 
IKJEBELI calls the Access Method interface routine (IKJEBEUT) to delete 
the record. (Deleting of a record is indicated by X'10' in the option 
code byte and a pointer to the particular record in the second word of 
the parameter list passed to IKJEBEUT) . IKJEBEUT- branches to the delete 
operation routine (IKJEBEDR) which uses the record locate routine 
(IKJEBELO) to find the record and the record delete routine (IKJEBEDL) 
to delete it. 

Line _Number_and.„Text_Specif ied 

If a required operand is followed by text (e.g. * •data 1 or 10 f data f ), 
IKJEBELI calls the line edit routine (IKJEBELE) which converts the text 
to be inserted (data) to uppercase, if CAPS were specified in the EDIT 
command or defaulted and converts tabs to the specified number of 
blanks. IKJEBELI calls IKJEBEUT to write the text into the specified 
line. (Writing is indicated by X f 20' in the option code byte and a 
pointer to the line in the data set in the second word of the parameter 
list passed to IKJEBEUT.) IKJEBEUT branches to the write operation 
routine (IKJEBEWR) which uses the record locate routine (IKJEBELO) to 
find the particular line in the data set. If a record exists in the 
line which IKJEBELO has found, the record delete routine (IKJEBEDL) is 
called to delete it. After the record is deleted, or if no record 
exists in the found line, IKJEBEWR branches to the move routine 
(IKJEBEMV) to insert the new record into the data set. (If the data set 
type is either IPLI or BASIC, the new record is also passed to the 
syntax checker which updates the reverse Polish-notated data set.) 
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Table 16. 
r 



Summary of line Insert/Replace/ Delete Operations 

T T T T T 

| Modules 
Involved 
in 
Processing 



"i 1 

Flow 
Chart 
ID 



h 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Functional Description 



MO 
ID 



None 



linnum 



None 



None 



IKJEEEMA 



Receives implicit subcom- 
mand buffer; invokes the 
Insert/Replace/Delete 
function. 



C2 



IKJEEEII 



Invokes the Access Method 
to find the record indi- 
cated by linnum and to 
delete it. 



14 



IKJEEEUT 



Acts as interface to IKJE- 
BEAA which locates the 
record with a key equal to 
linnum and deletes the 
record. 



27 



h- 



CW-CY 



CP,CQ 



f A 

ET 



i 1 

CW-CY 
.„. ^ 

CP,CQ 



None 



None 



None 



IKJEBEMA 



Same function as above. 



02 



IKJEEEII 



[ Invokes the Access Method 
to find the current record 
and tc delete it. 



14 



IKJEBEUT 



Acts as interface to IKJE- 
EEAA which locates the 
current record and deletes 
it. 



27 



h 



None 



linnum 
string 



None 



None 



IKJEBEMA 



Same function as above. 



02 



IKJEEEII 



Invokes the Access Method 
to find the record indi- 
cated by linnum and to 
replace it with 'string'. 



m 



IKJEEEUT 



Acts as interface to IKJE- 
BEAA which creates a reco- 
rd if no key corresponds 
to ' linnum' g or replaces a 
record having a corres- 
ponding key. 



27 



4 1 

ET 



-H— - * 

CW-CY 
1 

CP,CQ 



+ 4 

ET 
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Updating the. Current Line^Pointer 

If no text were specified, after the record is deleted, the Line 
Insert/Replace/Delete subcommand processor sets the current line pointer 
to the value of the key of the record preceding the deleted record. If 
a line number and text were specified, after the new record is inserted 
6r after the old record is replaced, the Line Insert/Replace/Delete 
subcommand processor sets the current line pointer to the key of the new 
record . 



LIST Subcommand Processing 

The LIST subcommand prints out specific records from the utility data 
set. Upon receipt of the LIST subcommand, the controller routine 
(IKJEBEMA) calls the command scan routine (IKJSCAN) to validate the 
subcommand. If the syntax is valid, IKJEBEMA invokes the LIST 
subcommand processor (IKJEBELT) . IKJEBELT determines if operands are 
present by checking the status of the operand switch (CAOPERND in 
IKJEBECA) . If operands are present, IKJPARS is called to scan them. 
Depending upon what the user has specified, the LIST subcommand 
processor: 

• Displays the entire utility data set, if no operands were specified. 

• Displays a range of records starting and ending with two specified 
line numbers, if a line number range were specified. 

• Displays a single record, if a single line number, or "*" were 
specified . 

The records displayed will contain line numbers if the data set is 
line numbered and the user has not specified the SNUM keyword. The LIST 
subcommand processor: 

• Displays unnumbered records with no line numbers. 

• Displays numbered records with line numbers, if SNUM were not 
specified. 

• Displays numbered records with no line numbers, if SNUM were 
specified. 

The LIST subcommand processor returns control to the controller routine. 

Processing LIST Operands 

This topic describes the way in which the LIST subcommand processor 
operates when particular operands are specified. Table 17, which 
follows this topic, summarizes the operations of the LIST subcommand 
processor. 

N2_2£e_£§jiSs_S£ecif ied 

If no operands are present {for example, if LIST was entered) , IKJEBELT 
calls the Access Method interface routine (IKJEBEUT) to read the first 
record of the data set. (Reading of the first record is indicated by 
X'04 f in the option code byte of the parameter list passed to IKJEBEUT.) 
IKJEBEUT branches to the read operation routine (IKJEBERR) which uses 
the record locate routine (IKJEBELO) to find the first record. IKJEBELT 
calls IKJEBEUT again, this time to read the next record in the data set. 
(Reading of the next record is indicated by X f 02 f in the option code 
byte of the parameter list passed to IKJEBEUT.) IKJEBELT calls IKJEBEUT 
after each succeeding record is read until the end of the data set is 
reached. 
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Line Number. Range. Specified 

If a range of lines were specified as operands (e.g. LIST 10 20 or LIST 
* 20 was entered) , IKJEBELT calls IKJEBEUT to read the record 
represented by the first operand. After this record is read IKJEBELT 
continues to call IKJEBEUT to read records until the record represented 
by the second operand is read. 

"*"_Qg_Single_ Line _ Number _ Specified 

If a single line were specified as an operand (e.g. LIST 10 or LIST * 
was entered) , IKJEBELT calls IKJEBEUT to read the particular record. 

HHH^!S£I£d_pata_Set 

If the data set is not line-numbered, IKJEBELT calls IKJPUTL to write 
out the record. 

Liner numbered ..D§fea _. Set j,_SNUM_ not ^Specified 

If the data set is line numbered and SNUM was not specified, IKJEBELT 
formats the output lines by affixing line numbers to their respective 
records (separated by one blank from the data) with up to three leading 
zeros truncated. After the output lines have been formatted, IKJEBELT 
calls IKJPUTL to write out the records. 

If the data set is line-numbered and SNUM was specified, IKJEBELT 
formats the output lines by blanking out the line numbers for 
fixed-length records or by left- justifying the text for variable-length 
records and for fixed-length records with line numbers starting in the 
first byte (COBOL) . After the output lines have been formatted, 
IKJEBELT calls IKJPUTL to write out the records. 
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Table 17. Summary of LIST Operations (Part 1 of 



2) 



h 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



| Modules 
| Involved 

in 
Operation 



Functional Eescription 



MO 
ID 



FlOVv 
Chart 

ID 



H 



LIST 



linnuml 
linnum2 



NUM 



None 



IKJEBEMA 



Receives subcommand from 
command buffer; invokes 
subcommand processor 
(IKJEEELT) - 



02 



IKJEBELT 



Invokes the Access Method 
to find the record with a 
key equal to linnuml and 
to read it and each suc- 
ceeding record until the 
record with a key greater 
than or equal to linnum2 
has been found and read; 
obtain records from IKJE- 
EEUT and invokes PUTLINE 
to display them one at a 
time. 



15 



IKJEBEUT 



Acts as interface to IKJE- 
EEAA which locates the 
records with keys from 
linnuml to linnum2. 



27 



CW-CY 



CT-CV 



-J 



ET 



1 



LIST 



* 

count 



SNUM 



None 



IKJEEEKA 



Same function as above. 



C2 



IKJEBELT 



Invokes the Access Method 
to find the current reco- 
rd, or the first record if 
* has a zero value, and to 
read it and each succeed- 
ing record until 'count' 
records have been read; 
displays records via 
PUTLINE. 



15 



IKJEEEUT 



Acts as interface to IKJE- 
BEAA which locates the 
record with the current 
key and the number of 
records (indicated by 
•count') which follow. 



27 



h 



CW-CY 

4 «f 

CT-CV 



f 1 

ET 



+ 1 

CW-CY 

4 "I 

CT-CV 



LIST 



linnum 



None 



None 



IKJEEEN.A 



IKJEBELT 



Same function as above. 
+ 



C2 



Invokes the Access Method 
to find the reccrd with a 
key equal to linnum and to 
read it; displays the 
record via PUTLINE. 



15 



IKJEEEUT 



I 
I 



Acts as interface to IKJE- 
BEAA which locates the 
record with a key equal to 
linnum. 



27 



f 1 

ET 



-J. J 
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Table 17. Summary of LIST Operations (Part 2 cf 2) 



h 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 
in 
Operation 



Functional Description 



MO 
ID 



Flow 
Chart 
ID 



LIST 



None 



NUM 



None 



IKJEEEKA 



Same function as above. 



C2 



| IKJEBELT 



Invokes the Access Method 
tc read all the records in 
the data set; displays the 
records via PUTLINE. 



15 



CW-CY 
CT-CV 



J. 

| IKJEBEUT 

I 

I 



I 



Acts as interface to IKJE- 
EE£A which locates the 
first record of the data 
set and each record 
thereafter until the end 
cf the data set is 
reached. 



27 



4 * 

ET 
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MERGE Subcommand Processing 

The MERGE subcommand copies all or part of a data set into a specified 
area within the data set being edited. Upon receipt of the MERGE 
subcommand, the controller routine (IKJEBEMA) calls the command scan 
routine (IKJSCAN) to validate the subcommand. If the subcommand is 
valid / IKJEBEMA invokes the MERGE subcommand processor (IKJEBEME) . 
IKJEBEME determines if operands are present by checking the status of 
the operand switch (CAOPERND in IKJEBECA) . If no operands are present 
IKJEBEME issues an error message. If operands are present, IKJPARS is 
called to validate them. IKJEBEME invokes IKJEBEDA to allocate a QSAM 
data set for use by the Final Copy routine (IKJEBEFC) . When the data 
set has been allocated, IKJEBEDA returns to IKJEBEME. IKJEBEME calls 
IKJEBEFC to copy the utility data set into the QSAM data set. When copy 
processing has been completed, IKJEBEFC returns to IKJEBEME. IKJEEEME 
again calls IKJEBEDA, this time to mark the DSE (Data Set Entry) for the 
QSAM data set as ' not-in-use. ' IKJEBEME builds a command buffer in 
which it sets up a model MERGE command to be used by TSO MERGE command 
processor. IKJEBEME calls the command invoker, (IKJEBECI) , which in 
turn invokes the TSO MERGE command processor. 

When the TSO MERGE command processor has completed processing, it 
returns control to IKJEBECI which returns control to IKJEBEME. IKJEBEME 
again invokes IKJEBEDA to allocate the QSAM data set which now contains 
the output from the system MERGE command processor. When the data set 
has been allocated, IKJEBEDA returns control to IKJEBEME. IKJEBEME 
calls the copy routine, IKJEBECO to copy the new QSAM data set to a new 
utility data set. When copy processing has completed, IKJEBECO returns 
control to IKJEBEME. IKJEBEME saves the current line pointer which now 
points to the end of the data set. IKJEBEME invokes IKJEBEDA a final 
time to free the QSAM data set. IKJEBEDA returns control to IKJEBEME. 
If the data set is IPLI or BASIC, IKJEBEME calls IKJEBEMR for 
re-translation of the reverse Polish-notated data set. IKJEBEME calls 
IKJEBEEX in every case to delete the old utility data set. When 
IKJEBEME receives control at the completion of MERGE command processing, 
it returns to the controller routine. 

The MERGE subcommand processor invokes the MERGE command (a Program 
Product) . The MERGE command processor combines the specified data sets 
or portions of data sets. See the Program Product publication, IBM 

System/360_Operatinc[ System, Time_ Sharing, 0^ tig n^ TSO^ Data Utilities,: 

Copy y , Format^ _JList Yj Merge User's, Guide, and Reference Manual for a 
description of the use and function of the MERGE control words. 

Processing, MERGE, Operands 

This topic describes the way in which the MERGE subcommand processor 
operates when particular operands are specified. (The Program Product 

publication TSO., Data Utilities: Copy M _ Format,,,, List x Merge User,' s Guide 

^H^-l§f^£^Ilc§-li^IIM.^i describes the particulars of the MERGE subcommand 
operands; the licensed Program Product publication, TSO Data, Utilities: 
Copy^_Format x _List^_Mer^e_Program_ describes the internal 

logic of the TSO MERGE command processor.) Table 18, which follows this 
topic, summarizes the operations of the MERGE subcommand processor. 

"*"J2nIX_Specified 

If the dsname is specified as '*', IKJEBEME uses the QSAM data set name 
obtained from IKJEBEDA as the first operand of the model MERGE command. 
The second dsname operand of the model command is the name of the QSAM 
data set. 
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DSNAME, Specified 

If a dsname is specified, IKJEBEME uses it as the first operand of the 
model MERGE command. The second dsname operand of the model command is 
the name of the QSAM data set. 

Linenumber j and Linenumber„2_Specif ied 

If linenum 1 and linenum 2 are specified by the user as operands of the 
subcommand, IKJEBEME moves them into the model MERGE command buffer as 
operands of the MERGE TSO command. 

tiB^IIillfe§£-l_§:lS-SIli21-lS^119L£i-§£§cified 

If the user specified data set is line-numbered and the merge point is 
«*», IKJEBEME places the current line pointer in the linenum 3 operand 
position of the model MERGE CDiumand. It then moves the keyword operand 
RENUM into the model command. 

Linenumber_3_and_N0NU^ 

If the user specified data set is not line-numbered and the merge point 
is •*', IKJEBEME calls IKJEBEUT to read the data set backwards from the 
current line pointer to the beginning to obtain a relative record 
number. If the user did not specify line number 3 IKJEBEME defaults the 
value to f * f . It then moves the keyword operand NONUM into the model 
command. 
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Table 18. 
r 



Summary of MERGE Operations (Part 1 cf 2) 



H 



Subcommand 



I 
I 
Operand | Keyword 



Keyword 
Value 



Modules 
Involved 
in 
Processing 



Functional Description 



MO 
ID 



Flow 

Chart 

ID 



H 



MERGE 



1 



(Refer to the 
Program Product 
publication, TSO 
Data Utilities : 
COPY, FORMAT , 



IKJEBEMA 



Receives subcommand from 
coinrand buffer; invokes 
subcommand processor 

(IKJEBEME) . 



02 



CW-CY 



IKJEEEKE 



for particulars.) 



Invokes IKJEEEEA to alloc- 
ate a QSAM data set to be 
used by the Final Copy 
routine (IKJEEEFC). 

Calls IKJEEEFC tc copy the 
utility data set into the 
QSAM data set. 

Euilds a command buffer in 
which it sets up a model 
MERGE command to be used 
by TSO MERGE command 
processor. 

For EASIC or IPLI, invokes 
IKJEBEMR to update the 
reverse Polish-nctated 
data set; invokes IKJEBEEX 
to unallocate the eld uti- 
lity data set. 



16 



H 



CZ-DA 



IKJEEECI 



Fasses control to the 
MERGE command processor 
via ATTACH with model com- 
mand as input; returns 
control to IKJEEEME when 
the MERGE command proces- 
sor has completed 
processing. 



AO,AP 



H 



,L J J 

(Part 2 of 2) 
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I Table 18. Summary of MERGE Operations (Part 2 cf 2) 



I- 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 
in 
Processing 



functional Descripticn 



MO 
ID 



Flow- 
chart 
ID 



H 



IKJEBEDA 



Allocates the QSAM data 
set which new contains 
output from the MERGE com- 
irand processor. 



IKJEBECO 



Copies the new QSAM data 
set tc a new utility data 
set. 



IKJEEEEC 



Copies old utility data 
set into an intermediate 
QSAM data set. 



IKJEBEEX 



Unallocates 
data set 
operation. 



old utility 
after merge 



26 



IKJEEE1YR 



Calls ITF language proces- 
sor to delete old in- 
stcrage data set and to 
create a new data set. 



AX 



H 



AU-AW 



f 1 

BR,BS 



BQ 



DB 



IKJEECI 



Euilds a parameter list 
and invokes the Command to 
attach the TSO PROFILE 
command. 



11 



IKJEEECI 



Attaches 
command. 



the 



PROFILE 



BW 



f 1 

AC,AP 

-J J 
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PROFILE Subcommand Processing 



The PROFILE subcommand redefines the set of options which control the 
flow of information to and from the terminal. Once defined, the options 
specified become part of the user profile, entered in the User Profile 
Table. The user profile remains in effect until it is redefined by the 
user. When User Profile Table entries are redefined, any options not 
specifically defined by operands on the PROFILE subcommand remain 
unchanged. 

Upon receipt of the PROFILE subcommand, the controller routine 
(IKJEBEMA) invokes the HELP/PROFILE subcommand processor (IKJEBEHE) . 
IKJEBEHE builds a two-word parameter list which contains pointers to the 
EDIT Communication Area (IKJEBECA) and to the subcommand buffer. 
IKJEBEHE insures that the third and fourth bytes of the subcommand 
buffer contain zeros. The contents of the buffer begin with a header 
word, which is a fullword, of the form "LLOO", where LL is the entire 
length of the buffer, including this header word. Zeros in the third 
and fourth bytes are necessary to enable IKJSCAN to scan the buffer. 
IKJEBEHE passes control (via XCTL) to the command invoker routine 
(IKJEBECI) . The command invoker routine invokes the TSO PROFILE command 
processor (via ATTACH) . (See the publication IM_ System/3 60_Operating 

Systems Time T Sharing, Qption_CommancL g£OCgs§Q£_P^Qgram Logic Manual 

l2iiil§-II f° r a description of the internal logic of the PROFILE command 
processor.) When the PROFILE command has completed processing, IKJEBECI 
receives control and returns to IKJEBEMA. Table 19 summarizes the 
operations of the PROFILE subcommand processor. 
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I Table 19. Summary of PROFILE Operations (Part 1 of 2) 

r T T T T T~ 



Subcommand 
PROFILE 



\ 



Operand 
None 



Keyword 



NOLINE 
CHAR 

or 
CHAR 



Keyword 
Value 



None 

(char) 

(BS) 



Modules 
Involved 
in 
Processing 



IKJEBEMA 



IKJEBEHE 



IKJEBECI 



TS0 

PROFILE 

Command 



Eunctional Description 



Receives subcommand from 
command buffer; invokes 
HELP/PROFILE subcommand 
processor (IKJEBEHE) . 



Builds a parameter list 
and invokes the Command 
Invoker to attach the TSO 
PROFILE command. 



Attaches 
command. 



the 



PROFILE 



Nullifies existing line 
delete characters; speci- 
fies a keyboard character 
(•char') or the keyboard 
backspace ('BS char') as 
the character delete 
indicator. 



MO 
ID 



02 



11 



FlOW 

Chart 

ID 



CW-CY 



-\ 



BW 



AO,AP 



\ 



H 



PROFILE 



None 
(char) 



IKJEEEKA 



Same function as above. 



C2 



CW-CY 



IKJEEEHE |Euilds a parameter listl 11 
and invokes the Command 
Invoker to attach the TSO 
PROFILE command. 



BW 



IKJEEECI 



Attaches 
command. 



the 



PROFILE 



+ \ 

AO,AP 



NCCHAR 
LINE 
or 
LINE 

or 
LINE 



None 

(char) 

(ATTN) 



(CTLX 



TSO 

PROFILE 

command 



Specifies a keyboard 
character ( f char') f the 
keyboard attention 
(•ATTN") or the X and CTLX 
keys en a teletype 
terminal as the line indi- 
cator; nullifies existing 
character- delete 
indicators. 



h 



< 

CW-CY 
1 

BW 



PROFILE 



None 



NOPROMPT 



PR 



IKJEBEMA 



Same function as above. 



IKJEEEEE 



Euilds a parameter list 
and invokes the Command 
Invoker to attach the TSO 
PROFILE command. 



02 
11 



IKJEEECI 



Attaches 
command. 



the 



PROFILE 



AO,AP 



H 



TSO 

PROFILE 

Command 



Specifies that the user 

is not to be prompted 

for required information. 



(Part 1 of 2) 
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Table 19. Summary of PROFILE Operations (Part 2 of 2) 
f : T _: T T T - 



Subcommand 






PROFILE 



Operand 



None 



Keyword 



INTERCOM 



Keyword 
Value 



None 



Modules 
Involved 
in 
Processing 



IKJEBEMA 
IKJEEEKE 



IKJEEECI 



TSO 

PROFILE 

Command 



Functional Description 



Same function as above. 



Euilds a parameter list 
and invokes the Command 
Invcker to attach the TSO 
PROFILE command. 



Attaches 
command. 



the 



PROFILE 



Specifies that the user 

will accept messages 

frcir ether terminal users. 



MO 
ID 



02 
11 



Flow 

Chart 

ID 

4 -I 

CW-CY 



AO,AP 
f 1 



BW 



H 



PROFILE 



None 



PAUSE 



None 



IKJEBEMA 



Same function as above. 



02 



IKJEEEEE 



Euilds a parameter list 
and invokes the Command 
Invcker to attach the TSO 
PROFILE command. 



11 



IKJEEECI 



Attaches 
command. 



the 



PROFILE 



f 

-\ TSO 

PROFILE 
Command 



Specifies that the user 
will receive any available 
second-level messages 
issued during execution of 
a command procedures. 



CW-CY 



Btf 



H 



AO,AP 



(Part 2 of 2) 
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RENUM Subcommand Processing 

The RENUMBER subcommand assigns line numbers to each record of an 
unnumbered data set or renumbers each record of a numbered data set. 
Upon receipt of the renumber subcommand, the controller routine 
(IKJEBEMA) calls the command scan routine (IKJSCAN) to validate the 
subcommand. If the subcommand is valid, IKJEBEMA invokes the RENUMBER 
subcommand processor (IKJEEERE) . IKJEBERE determines if operands are 
present by checking the status of the operand switch. If operands are 
present (CAOPERND in IKJEBECA is set to 1) IKJEBERE calls IKJPARS to 
validate the operands. Depending upon what the user has specified, the 
RENUM subcommand processor: 

• Renumbers an entire utility data set from the first record if no 
operands are specified or if an "old line number" is specified which 
is equal to the first record. 

• Renumbers a range of records from a specified record to the end of 
the data set if an "old line number" is specified. 

The RENUM subcommand processor assigns line number values and an 
increment value: 

• Based on the last increment used by INPUT or RENUM, if no operands 
are specified. (An increment of 10 is used if this is the first use 
of either subcommand.) 

• Based on values specified as "new line number" operand and 
"increment" operand. 

After the records have been renumbered, the RENUM subcommand processor 
updates the following fields in IKJEBECA: 

• CANONUM bit set to if the data set was previously unnumbered. 

• CACURNUM, the current line pointer, set to the same relative record 
that it pointed to before RENUM processing. 

• CAIMLLNO, the last input line number. 

• CAIMLINC, the increment used to renumber the data set. 

• CASTNUM, the starting line number. 

• CADSMODS bit in CACFLAG2, set to 1 to indicate that the data has 
been modified. 

• CAIMPT bit in CACFLAG3, set to 1 to indicate that Input mode is to 
prompt with line numbers. 

The RENUM subcommand processor (IKJEBERE) then returns control to the 
controller routine. 

Proc e s s i nc£_ R E N U M_ 0£e r a n ds 

This topic describes the way in which the RENUM subcommand processor 
operates when various operands are specified. Table 20, which follows 
this topic, summarizes the operations of the RENUM subcommand processor. 
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l?Q-.Qp§£ftfltls_ Specified 

If no operands are specified IKJEBERE calls IKJEBEUI to allocate a new 
output utility data set. If the data set type is BASIC, IKJEBERE calls 
| IKJEBERN and IKJEBEMR to renumber the utility and reverse Polish-notated 
data sets respectively. If the data set type is IPX I, IKJEBERE 
renumbers the utility data set and invokes IKJEBEMR to update the run 
time data set. IKJEBERE invokes the Access Method (IKJEBEAA) via 
IKJEBEUT, the interface routine, to read the first specified record. If 
the data set is not already numbered IKJEBERE examines the record and if 
necessary, formats it. IKJEBERE calls IKJEBEUT to write each updated 
record into the utility data set. Processing continues as if operands 
had been specified. See Continued Processing below. 

"Old Line NumberlV.Specified 

If an old line number has been entered as an operand, it must be 
validated. IKJEBEUT reads the record specified by old line number. If 
the new line number is greater than or equal to the old line number 
(i.e., the record key) processing passes to a copying loop in IKJEBERE. 
However, if the new line number is less than the old line number 
IKJEBERE calls IKJEBEUT to read the record preceding the one just read. 
If the record read is greater than or equal to the new line number, a 
message is issued and RENUM terminates. Since the data set is already 
numbered IKJEBERE updates the record keys by adding the user specified 
increment to the first new key and numbers succeeding lines by the 
increment. IKJEBERE calls IKJEBEUT to write each updated record into 
the new utility data set and continues processing. 

£ontinuj|d_Processing 

• If the record format is fixed and non-blanks are in the area needed 
for the line number (bit CACRECFM in CACFLAC2 is set to 1) , IKJEBERE 
updates the key and indicates that a truncation message must be 
issued (ISSTRUNK bit in REMYFLAC is set to 1) . 

• If the record format is variable (bit CACRECFM in CACFLAC2 is set to 
0) , IKJEBERE shifts the data to the right to make room for the line 
number to be entered. If this causes data overflow of non-blank 
characters and the data set is not "TEXT" type the ISSTRUNK bit in 
REMYFLAC is set to 1 indicating truncation. If the data set is 
•TEXT 1 type, IKJEBERE breaks the record, builds a new record using 
the overflow and sets the ISSTRUNK bit to 1. 

• IKJEBERE calls IKJEBEEX to close and unallocate the old utility DCB 
if renumbering is successful. 

• IKJEBERE moves the current DCB pointer (CAPTCDCB in IKJEBECA) to the 
previous DCB pointer field (CAPTPDCB) . It then resets the CAPTCDCB 
field to the address of the new utility DCB and returns to IKJEBEMA. 
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Table 20. Summary of RENUM Operations 

r T T T T" 



h 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved in 
Processing 



Functional Description 



MO 
ID 



T 1 

FlOW 
(-Chart | 
ID 



RENUM 



None 



None 



None 



IKJEEE1YA 



Receives subcommand from 
command buffer; invokes 
subcommand processor. 



C2 



IKJEBERE 



Invokes the Access Method 
to find and read each 
record of the data set; 
gives the first record a 
line number of 10 and 
renuirbers the succeeding 
records, each with an 
increment of 10 until the 
data set has been renum- 
bered; after each record 
is renumbered,, invokes the 
Access Method to write the 
record into a new utility 
data set (Renum data set) . 



18 



IKJEBEUT 



Acts as interface to IKJE- 
EEAA which, beginning at 
the first record of the 
data set, reads the reco- 
rds into storage and 
writes them into the Renum 
data set. 



27 



IKJEEEUI 



Acquires the Renum data 
set. 



26 



IKJEEEEX 



Closes and frees data set. 



26 



h 



CW-CY I 



4 -I 

DJ-DMI 



ET 



EQ 

f 1 

BQ 



RENUM 



New 
linenum 

incre 

old 
linen urn 



None 



None 



IKJEBEMA 
IKJEEERE 



Same function as above. 



Invokes the Access Method 
to find and read the 
record with a key equal 
to 'old linenum'; gives 
this record a new line 
number equal to 'new 
linenum'; invokes the 
Access Method to read the 
remainder of the data set 
into storage one by one; 
renuirbers the succeeding 
records with an increment 
cf 'incre'; invokes the 
Access Method to write 
renumbered records into a 
new utility data set 
(Renum data set) . 



02 
18 



IKJEBEUT 



Beginning at the record 
with a key equal tc 'old 
linenum',, reads the reco- 
rds into storage and 
writes them into the Renum 
data set. 



27 



IKJEBEUI 



Same function as above. 



f 



IKJEEEEX 



Same function as above. 



26 
26 



CW-CYI 



DJ-DN I 



ET 



EQ 



BQ 
JL J 
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RUN Subcommand Processing 

| The RUN subcommand compiles, loads, and executes ASM, BASIC, COBOL, 
FORTGI, IPLI, PLI, and GOFORT data sets. Upon receipt of the RUN 
subcommand, the controller routine (IKJEBEMA) calls the command scan 
routine (IKJSCAN) to validate the subcommand. If the subcommand is 
valid, IKJEBEMA invokes the RUN subcommand processor (IKJEBERU) . If the 

I data set is not an executable one, i.e., not ASM, BASIC, COBOL, FORTGI, 
PL/I, PL/I(F), IPLI or GOFORT or any other user-specified types that 
are non-executable, IKJEBERU returns control to IKJEBEMA. IKJEBERU 
determines if the data set type is BASIC or IPLI. If the data set type 
is either BASIC or IPLI, IKJEBERU calls the appropriate syntax checker 
which runs the data set. For all other data set types, IKJEBERU 
determines if operands are present by checking the status of the 
operand switch. (CAOPERND in IKJEBECA) . If operands are present, IKJPARS 
is called to scan them. If no operands are present, or after operands 
have been validated, depending upon the data set type, the RUN subcommand 
processor performs the following functions : 

• For data set types that can accept in-storage data sets (i.e., the 
CARUNDS bit is on in IKJEBECA) , reads records from the utility data 
set into storage or allocates a new data set if the utility data set 
is too large to be contained in a 4K in-storage data set. 



I 



• For all other data set types, allocates a new data set. 

For the data set types that required an allocated data set, the RUN 
subcommand processor: 

• Invokes the final copy routine (IKJEBEFC) to write a copy of the 
original data set in QSAM format into the newly allocated data set. 

• Invokes the allocating routine (IKJEBEDA) to mark the DSE entry not 
in use . 

• Invokes TSO RUN command processor, for an OBJ-generating data set 
(i.e., CAOBJGEN bit is on in IKJEBECA). (See the IBM System/360 

Operating System Time Sharing Option Command Processor Program Logic 
Manual Volume VI publication for a description of the internal logic 
of the RUN command processor) . 

• Invokes the appropriate prompter whose name is obtained from the 
CAPRNAME field in (IKJEBECA) or a non-OBJ-generating data set. 

For data set types that can accept in-storage data sets, the appropriate 
prompter whose name is obtained from the CAPRNAME field in (IKJEBECA) 
is invoked. 

When TSO RUN command processing has been completed, the RUN subcommand 
processor : 

• Returns command to the controller routine. 

RUN Processing for Particular Data Set Types 

This topic describes the way in which the RUN subcommand processor 
operates when particular data set types are specified. Table 21, which 
follows this topic, summarizes the operations of the RUN subcommand 
processor . 
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GOFQRT Data Set Type 

If the data set type accepts in-storage data sets, IKJEBERU attempts to 
build a copy of the utility data set in storage. A GETMAIN is issued for 
4K of buffer storage and records are read using IKJEBEUT . Each record is 
moved into the buffer (with the record key removed) until all records in 
the utility data set have been read, or until ttys buffer storage is 
exhausted. 

If the buffer storage is exhausted before the data set can be built, 
IKJEBERU invokes IKJEBEDA to allocate the run-time data set, and 
IKJEBEFC to copy the utility data set into a sequential (run-time) data 
set. 

When the data set is copied into the run-time data set or into 
storage, IKJEBERU builds a model command and invokes the appropriate 
prompter via IKJEBECI . The run-time data set is unallocated via IKJEBECA, 
if data set was allocated. 

For any OBJ-generating data set, IKJEBERU invokes IKJEBEDA to allocate an 
intermediate sequential (run-time) data set and IKJEBEFC to copy the utility 
data set into the run-time data set. A model RUN command is built and the 
system RUN command processor is invoked via IKJEBECI . Upon return from 
IKJEBECI, IKJEBERU invokes IKJEBEDA to unallocate the run-time data set, and 
the corresponding OBJ data set. 

BASIC or IPLI Data Set Type 

IKJEBERU invokes the appropriate language processor which is resident in 
storage while EDIT is being executed. 

For any other executable data set type, IKJEBERU invokes IKJEBEDA to allocate 
an intermediate sequential (run-time) data set and IKJEBEFC to copy the 
utility data set into the run-time data set. A command is built and its 
appropriate prompter (whose name is extracted from the CAPRNAME field of 
IKJEBECA) is invoked via IKJEBECI. Upon return from IKJE BECI , IKJEBERU 
invokes IKJEBEDA to unallocate the run-time data set. 

Note : Execution of source data sets other than IPLI, BASIC, or GOFQRT is 
accomplished through the system Loader. If the 'parameters 1 operand is 
specified on the EDIT RUN subcommand, the Loader will pass the specified 
parameters in accordance with the standard Operating System linkage 
conventions. See the topic "Program Management Services" in the 
publication IBM System/360 Operating System; Supervisor Services , 
GC28-6646 for information about these conventions. 
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I Table 21. Summary of RUN Operations (Part 1 of 2) 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 

in 
Processing 



Functional Description 



MO 
ID 



Flow 

Chart 

ID 



RUN 



para- 
meters ' 



None 



IKJEBEMA 



IKJEBERU 



IKJEBEDA 



IKJEBEFC 



IKJEBECI 



TSO RUN 
Command 



Receives subcommand from 
command buffer; invokes 
subcommand processor 
(IKJEBERU) . 



02 



CW-CY 



Invokes I 
acquire a 
the Final 
(IKJEBECF 
records f 
data set 
data set; 
command ; 
command i 
attaches 
command , 
generatin 
otherwise 
approproa 



KJEBEDA to 

Run data set and 

Copy Routine 
) to read the 
rom the utility 
into the new Run 

builds TSO RUN 
invokes the 
nvoker which 
the TSO RUN 
for OBJ- 
g data sets; 

it attaches the 
te prompter . 



19 



DP,DQ 



Is invoked to: 
1 . Allocate a QSAM data 

set . 
2 . Mark DSE. entry not in 

use . 

3. Unallocate the QSAM 
data set. 

4. Unallocate the OBJ 
data set, if one was 
generated . 



AX. 



Invokes the Access Method 
to find and read each 
record from the utility 
data set into the Run data 
set . 



BR,BS 



For an OBJ-generating data 
set invokes the TSO RUN 
command; otherwise invokes 
the appropriate prompter; 
in both cases passes the 
command buffer built by 
IKJEBERU. (RUN subcommand 
parameters are included) . 
It also invokes the 
commands in the procedure 
built by the RUN command, 
if the data set type was 
OBJ-generating . 



AO,AP 



Builds a command procedure 
required to cause 
compilation and execution 
of the RUN data set, for 
OBJ-generating data set 
types . 



OSOS 



RUN 



None 



LMSG 
SPREC 



None 



IKJEBEMA 



Same function as above . 



02 



CW-CY 



IKJEBERU 



BASIC data set - IKJEBERU 
invokes LANGPRCR to 
execute data. 



19 



DP,DQ 



LANGPRCR 



Executes user's data set. 
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I Table 21. Summary of RUN Operations (Part 2 of 2) 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 

in 
Processing 



Functional Description 



MO 
ID 



Flow 

Chart 

ID 



RUN 



None 



None 



None 



IKJEBEMA 



IKJEBERU 



IKJEBEUT 



IKJEBEDA 



IKJEBEFC 



IKJEBECI 



TSO RUN 
Command 



Receives subcommand from 
command buffer; invokes 
subcommand processor 
(IKJEBERU) . 



02 



CW-CY 



For data set types 
accepting in-storage data 
sets invokes IKJEBEUT to 
read the data set into a 
4K in-storage buffer; 
invokes STACK to put the 
in-storage data set on the 
input stack; invokes 
IKJEBECI to attach the 
appropriate prompter. 
For other data set types 
(excluding BASIC or IPLI) , 
or for data sets over 4K 
that were acceptable in- 
storage invokes IKJEBEDA 
to allocate a run-time 
data set; invokes IKJEBEFC 
to copy the utility data 
set into the run-time data 
set and invokes IKJEBECI 
to attach either system 
RUN or the appropriate 
prompter , 



19 



DP,DQ 



Reads records into the 4K 
in-storage buffer via 
IKJEBEAA, in the storage 
of a data set type 
accepting on in-storage 
data set 



27 



ET 



Is invoked to: 

1 . Allocate a QSAM data 
set. 

2 . Mark DSE entry not in 
use . 

3. Unallocate the QSAM 
data set. 

4. Unallocate the OBJ 
data set, if one was 
generated. 



AX 



Copies the utility data 
set into the sequential 
run-time data set. 



BR,BS 



For an OBJ-generating data 
set invokes the TSO RUN 
command; otherwise invokes 
the appropriate prompter; 
in both cases passes the 
command buffer built by 
IKJEBERU. (RUN subcommand 
parameters are included) . 
It also invokes the 
commands in the procedure 
built by the RUN command, 
if the data set type was 
obj-generating . 



AO,AP 



Builds a command procedure 
required to cause 
compilation and execution 
of the RUN data set. 
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SAVE Subcommand Processing 

The SAVE subcommand retains the copy of the Edit data set to which 
changes have been made. Upon receipt of the SAVE subcommand , the 
controller routine (IKJEBEMA) calls the command scan routine (IKJSCAN) 
to validate the subcommand. If the subcommand is valid, IKJEBEMA 
invokes the SAVE subcommand processor (IKJEBESA) . IKJEBESA determines 
if operands are present by checking the status of the operand switch 
(CAOPERND in IKJEBECA) . If operands are present, IKJPARS is called to 
scan them. 

Depending on whether or not the user has specified a data set name as 
an operand, the SAVE subcommand processor: 

| • Saves only the updated version, if one exists, of an Edit data set 
if the user has not specified an operand. 

• Saves the updated version of the Edit data set and retains the 

| original version, if one exists. The updated version is given the 
data set name specified by the user as operand. 

• Returns control to the controller routine. 

J?£Qcessing_the SAVE,, Subcommand 

This topic describes the way in which the SAVE subcommand processor 
operates when operands are specified or not specified. Table 22, which 
follows this topic, summarizes the operation of the SAVE subcommand 
processor. 

DSNAME_S£ecified 

If a data set name is present and not enclosed in quotes, IKJEBESA 
invokes IKJDFLT to qualify the name. IKJDFLT places the user 
identification as the left qualifier (if it is not present) and the data 
set type qualifier as the right qualifier (if it is not present, or if 
only one index level is specified) . If the data set type is present as 
the right qualifier, IKJEBESA removes it and invokes IKJDFLT to place it 
back again. If the data set name is enclosed in quotes and has more 
than one index level, IKJEBESA removes the rightmost qualifier and 
invokes IKJDFLT to place it back again. 

If only a member name is present and a member name was specified on 
the EDIT command, the Edit data set name is used and is treated as if it 
were enclosed in quotes. If only a member name is present and no member 
name was specified on the EDIT command, IKJEBESA invokes IKJDFLT to 
concatenate the user identification and data set type qualifier. 
IKJDFLT also determines if the fully-qualified data set name is 
cataloged. 

After the data set name is fully-qualified, IKJEBESA compares it with 
the fully-qualified Edit data set name. If the names are the same, 
processing continues as if no operands were present. If the names 
differ, then the updated Edit data set will be retained with the Save 
data set name. If the data set name is not cataloged, IKJEBESA calls 
the data set allocation routine (IKJDAIR) to allocate a new data set 
with a disposition of NEW, CATLG. If IKJDAIR is unable to allocate a 
data set with this disposition because a data set already exists with 
this name, or if the name is cataloged, further processing depends on 
the data set organization. 
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If the data set is sequential, IKJEBESA issues a warning message to 
the user, who may then enter a different data set name to begin 
processing over again, or a carriage return to continue processing. 
IKJDAIR is then called to retry allocation of the data set. 

If the data set is partitioned and the specified member exists, 
IKJEBESA issues a warning message to the user, who may then enter a 
different member name or a carriage return to use the specified member. 

When the data set has been allocated, IKJEBESA calls the final copy 
routine (IKJEBEFC) . Processing continues with IKJEBEFC calling IKJEBEUT 
which reads records from the utility data set, and writes them into the 
Save data set. Thus the data set with changes is retained with the Save 
data set name, and the original Edit data set, if any, is undisturbed. 
IKJEBESA returns control to IKJEBEMA, after calling IKJDAIR to 
unallocate the data set. 

!2_0perands_S£ecif ied 

If no operands are present, the changed version of the Edit data set 
that is on the utility data set is to replace the original Edit data 
set. If the Edit data set is already allocated, IKJEBESA can call the 
final copy routine (IKJEBEFC) to write the contents of the utility data 
set into the Edit data set. If the Edit data set is not already 
allocated (that is, for the first allocation of a NEW data set) , the 
Edit data set name is treated as described under "Dsname Specified." If 
the IKJDFLT service routine finds that the Edit data set is cataloged 
when the user specified NEW on the Edit command, the user is warned and 
prompted to: (1) re-use the data set or (2) specify an alternate data 
set name. If the Edit data set exists and is partitioned, and if the 
member name specified exists (NEW was specified on the command) , the 
user is warned and prompted to: (1) to re-use the member or (2) to 
specify a new member name. Once the Edit data set has been allocated, 
IKJEBEFC is invoked to copy records from the utility data set into the 
Edit data set. 
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Table 22. Summary of SAVE Operations 
r t t t 



-T — 1 

[Flow 
I Chart I 

ID 

-f 1 

I CW-CY I 



Subcommand 

I- 

SAVE 






Operand 



dataset 
name 
(not the 
same as 
the Edit 
data set 
name) 



Keyword 
None 



Keyword 
Value 



None 



IKJEBEFC 



Modules 
Involved 

in 
Processing 

IKJEEENA 



Functional Description 

Receives subcommand from 
command buffer; invokes 
subcommand processor 
(IKJEBESA). 



IKJEEESA 



MO 
ID 

f 

C2 



Invokes TSO service 
routine IKJDFLT to fully 
qualify data set name; 
invokes TSO service rou- 
tine IKJDAIR to allocate a 
Save data set; invokes the 
final copy routine (IKJE- 
BEFC) to write the con- 
tents cf the utility data 
set into the Save data 
set. 

Invokes the Access Method 
to find and read each 
record of the utility data 
set; writes the records in 
to the Save data set. 



20 



-f 1 

I DR-EB I 



-4 — -H 

|BR,BS| 



-f 1 

| CW-CY | 

-+ "f 

IDR^EBI 



SAVE 



None or 
data- 
set name 
(same 
name as 
Edit 
data 
set) 



None 



None 



IKJEEEKA 
IKJEBESA 



Same function as above. 



C2 



Invokes the TSO service | 20 
routine IKJDFLT to fully 
qualify data set name, if 
data set name is 
specified; determines 
that data set name speci- | 
fied and Edit data set| 
name are the same; invokes) 
the final copy routine | 
(IKJEEEFC) to write the| 
contents of the utility | 
data set into the Edit I 
data set. 

IKJEEEPC | Invokes the Access Method) 
to find and read each) 
record of the utility data| 
set; converts each record | 
to QSAM data set format | 
and writes the records | 
into the Edit data set. 



-f 1 

|BR,BS| 
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SCAN Subcommand Processing 

The SCAN subcommand performs syntax checking for statements that will be 
processed by the PL/I (F) , FORTRAN (E) , FORTRAN (G) or FORTRAN (H) compiler 
or by the Code and Go FORTRAN, FORTRAN IV (G1) , ITF: BASIC or ITF: PL/I 
Program Product. Upon receipt of the SCAN subcommand, the controller 
routine (IKJEBEMA) calls the command scan routine (IKJSCAN) to validate 
the subcommand. If the syntax is valid, IKJEBEMA invokes the first load 
of the SCAN subcommand processor (IKJEBESC) . IKJEBESC determines if the 
data set type specified by the user is an invalid type for scanning 
(CASCAN switch in IKJEBECA is set to zero) . If so, IKJEBESC invokes the 
message service routine to issue an error message and returns control to 
the caller. 

Depending upon what the user has specified, the SCAN subcommand 
processor: 

• Loads and initializes the required syntax checker, if the ON keyword 
were specified. 

• Deletes the syntax checker, if the OFF keyword were specified. 

• Passes records from the utility data set to the syntax checker in 
storage, if the line number or "count" operands were specified. 

• Passes all the records from the utility data set to the syntax 
checker in storage, if no operands were specified. 

Note: The BASIC and IPLI syntax checkers are used to update the 
reverse Polish-notated data set and to scan source statements for 
syntax errors. The topic Syntax_Checkincj describes the use of the 
reverse Polish-notated data set. 

The SCAN subcommand processor is also invoked by the controller 
routine when the SCAN keyword of the EDIT command is specified, or when 
the data set type is BASIC or IPLI. 

After the specified records have been syntax checked, the SCAN 
subcommand processor returns control to the controller routine. 

££2ces sing_SC A N_0£er an ds 

This topic describes the way in which the SCAN subcommand processor 
operates when particular operands are specified. Table 23, which 
follows this topic, summarizes the operations of the SCAN subcommand 
processor. 

LiS§_Ilili££§_2£_Co unt_ Specif ied 

If either of these operands are present (CAOPERND switch in IKJEBECA is 
not zero) IKJEBESC calls IKJPARS to check the validity of the operands. 
IKJEBESC checks the availability of the appropriate syntax checker. If 
the syntax checker is available in the system (CASYNAME field in 
IKJEBECA is not equal to 0) , IKJEBESC invokes IKJEBESN, the second load 
module of the SCAN subcommand processor. IKJEBESN loads and initializes 
the checker if it is not in storage (CAPTCHK field of IKJEBECA=0) , and 
invokes IKJEBEAA, the Access Method to read into storage the range of 
records specified by the user as operands of the SCAN subcommand. If 
the data set type is BASIC or IPLI, the syntax checker is already in 
storage. Tfre module IKJEBEUT acts as an interface between IKJEBESN and 
IKJEBEAA which locates the record keys corresponding to the user 
specified keys. 
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IKJEBEUT informs IKJEBESN if the user specified data set is empty. 
IKJEBESN calls the appropriate syntax checker for the data set type and 
informs the user of any syntax errors. 

l2-0£6rands_Specified 

If no operands are present (CAOPERND switch in IKJEBECA is zero) 
IKJEBESC calls IKJEBESN / the second load module of the SCAN subcommand 
processor. IKJEBESN loads and initializes the syntax checker/ if 
necessary/ and invokes the Access Method IKJEBEAA/ using the module 
IKJEBEUT as an interface. IKJEBEAA locates and reads the first record 
and every record following until the entire data set has been read into 
storage. 

No_Operands_and 0N n Keyword Specified 

If no operands are specified and the keyword ON is specified each line 
of input from the user terminal is to be syntax checked as it is 
entered. IKJEBESC checks the availability of the syntax checker; if the 
data set type is other than ITF # IKJEBESC loads and initializes the 
appropriate syntax checker, IKJEBESC turns on the CASCANSW switch in 
IKJEBECA. From this time on/ the INPUT subcommand processor (IKJEBEIP) 
will pass input records from the terminal to the syntax checker for 
verification. 

No, Operands^ and. OFF, Keyword Specif ied 

If no operands are specified and the keyword OFF is specified IKJEBESC 
deletes the syntax checker unless the data set type is BASIC or IPLI. 
IKJEBESC turns off the CASCANSW switch in IKJEBECA. 
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Table 23. Summary of SCAN Operations (Part 1 cf 4) 

r ~ T" "T " T T T— 

Modules 



"I 1 

Flow 
Chart 

ID 



l~ 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Involved 

in 

Processing 



Functional Description 



MO 
ID 



\ 



SCAN 
(NOSCAN 
specified 
on EDIT 
command) 



linnuml 
linnum2 



None 



None 



IKJEEEtfA 



Receives subcommand from 
command buffer; invokes 
subcommand processor 
(IKJEBESC). 



C2 



CW-CY 



— f 



IKJEEESC 



Checks availability of 
syntax checker; if syntax 
checker is available, 
invokes the second load of 
the SCAN subcoirirand pro- 
cessor (IKJEBESN) to per- 
form the syntax checking 
of the specified records. 



21 



f 1 

EC-EG 



IKJEEESN 



If data set type is net 
BASIC or IPLI, loads and 
initializes syntax check- 
er, if it is not in 
storage (if data set type 
is BASIC or IPLI, the 
checker is already in 
storage) ; invokes the 
Access Method to locate 
and to read into storage 
the range cf records 
beginning with the record 
with a key egual tc 'lin- 
numl' and ending with the 
record with a key equal to 
•linnum2'; invokes the 
appropriate syntax checker 
to perform its function on 
the records which were 
read into storage; informs 
the user of any syntax 
errors. 



21 



f 1 

EI-EN 



IKJEEEUT 



-^. -L- 



Acts as interface to IKJE- 
BEAA which locates the 
record with a key equal to 
'linnuml' and reads it and 
the succeeding records 
(ending with record 'lin- 
nuiri2' key value) into 
storage; informs IKJEBESN 
if the data set is empty. 



27 



f 1 

ET 



(Part 1 of 4) 
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Table 23. Summary of SCAN Operations (Part 2 of 4) 
r T — _ T T T T - 

I 



I 



Subcommand 



Same function as above. 



02 



SCAN |* 

(SCAN | count JNone | None | IKJEBEMA 

specified 

on EDIT I I I I IKJEEESC 

command) 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 
in 
Processing 



IKJEBESN 



IKJEEEUT 



Functional Description 



Same function as above. 



Invokes the Access Method | 
to locate and to read into| 
storage the range of reco- | 
rds beginning with the | 
current record and ending] 
when the number cf records | 
read into storage is equal] 
to the value specified in| 
•count'; invokes the) 
appropriate syntax checker) 
(which has already been| 
loaded into storage) to| 
perform its function on| 
the records which were| 
read into storage; informs 
the user of any syntax | 
errors. 

Acts as interface to IKJE- ! 
BEAA which locates the | 
record with the current | 
key and reads it and the | 
succeeding records into| 
storage until the value! 
specified in ' count' has| 
been satisfied; informs] 
IKJEEESN if the data set| 
is empty. 



MO 
ID 



| FlOW 

I Chart I 
ID 

H- 1 



ICW-CYI 



21 



IEC-EGI 



21 



I EI- EN I 



27 



f H 

ET 



-i. 

(Part 



j j 

2 of 4) 
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Table 23. Summary of SCAN Operations 
r _^ T T T 



(Part 3of U) 



h 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 

Involved 

in 

Processing 



Functional Description 



MO 
ID 



Flow 
Chart 

ID 



SCAN 
(N0SCAN 
specified 
on EDIT 
command) 



None 



None 



None 



IKJEEENA 



Same function as above. 



IKJEBESC 



Same function as above. 



IKJEEESN 



IKJEEEUT 



If data set type is net 
BASIC or IPLI, loads and 
initializes syntax checker 
(if data set type is BASIC 
cr IPLI f checker is alrea- 
dy in storage) ; invokes 
the Access Method to loc- 
ate every record in the 
data set and tc read them 
into storage; invokes the 
appropriate syntax checker 
to perform its function on 
the records which were 
read into the data sets; 
inforirs the user of any 
syntax errors. 
+ 



C2 
21 
21 



h 



Acts as interface to IKJE- 
BEAA which locates the 
first record in the data 
set and reads it and every 
record thereafter until 
the entire data set has 
been read into storage. 



27 



CW-CY 



EC- EG 



-i 



EI-EN 



ET 



H 



SCAiM 
(NCSCAN 
specified 
on EDIT 
command) 



None 



ON 



None 



IKJEBEMA 



Same function as above. 



IKJEEESC 



Checks availability cf 
syntax checker; if the 
data set type is other 
than BASIC or IPLI, and if 
"SCAN ON'" has net been 
issued previously, loads 
and initializes the appro- 
priate syntax checker (if 
the data set type is EASIC 
or IPLI the syntax checker 
is already leaded and 
initialized) ; input reco- 
rds from the terminal 
received by EDIT during 
Input irode from this point 
on will be passed to the 
syntax checker; turns en 
CASCANSW switch in 
IKJEEECA. 



02 
21 



CW-CY 



EC-EG 



(Part 3 of H) 
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Table 23. Summary of SCAN Operations (Part 4 of <D 
r T T T 



T T 

Modules 
Involved 
in 
Processing 



l~ 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Functional Description 
Same function as above. 



MO 
ID 



| Flow 
| Chart | 
ID 

-4 i 

|CW-CY| 

-f 1 

I EC-EG I 



SCAN 
(SCAN 
specified 
on EDIT 
command) 



None 



OFF 



None 



IKJEBEMA 
IKJEEESC 



02 
21 



If the data set type is 
other than BASIC or IPLI, 
deletes the syntax checker 
if it is in storage (the 
syntax checker is net 
deleted if the data set 
type is EASIC or IPLI). 
Turns off CASCANSW switch. 



h 



-f H 

I CC-C J I 



EDIT 

(SCAN 

subcommand 

not 

specified) 



SCAN 



None 



IKJEEEIN 



Eeterirines if syntax 
checker is available; if 
syntax checker is 
available, indicates the 
fact by setting CASCANON 
to 1 and not setting 
CASYNAME to 000000C0. 



CI 



IKJEBEMA 



Loads the appropriate syn- 
tax checker; invokes the 
SCAN subcommand processor 
(IKJEEESC) to initialize 
it. 



02 



-4 1 

ICW-CYI 



IKJEEESC 



h 



Initializes the syntax 
checker which was loaded 
intc storage. 



21 



-f— - H 

I EC-EG I 



-4 i 

BP 



END | None 

(SCAN 

subcommand 

not 

specified) 



I- + 

EDIT 
(SCAN 

subcommand | 
not 
specified) 



None 



None 



IKJEBEEN 



Invokes the SCAN 
subcoirirand processor 
(IKJEBESC) to delete the 
syntax checker, if it is 
in storage. 



NCSCAN 
BASIC 
Or 
IPLI 



4 

None 



IKJEEESC 
IKJEEEIN 



Deletes the syntax checker 
in storage. 



21 






If the syntax checker is 
available, indicates the 
fact by not setting 
CASYNAME to 00000000. 



CI 



-f 1 

| EC-EG | 

-4 ^ 

I CC-CJ I 



IKJEBEMA | Loads the BASIC or IPLTI 02 
LANGPFCR; invokes the SCAN 
subcommand processor 
(IKJEEESC) to initialize 
it. 



-4 1 

ICW-CYI 



IKJEEESC 



Initializes 

which was 
storage. 



the LANGPRCR 
loaded into 



21 



-4 1 

I EC-EG I 
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TABSET Subcommand Processing 

The TABSET subcommand establishes or changes tabulation settings or 
nullifies any existing tabulation settings. Upon receipt of the TABSET 
subcommand the controller routine (IKJEBEMA) calls the command scan 
routine (IKJSCAN) to validate the subcommand. If the subcommand is 
valid, IKJEBEMA invokes the TABSET subcommand processor (IKJEBTA) . 
IKJEBETA determines if operands are present by checking the status of 
the operand switch (CAOPERND) in IKJEBECA. If operands are present, 
IKJEBETA calls IKJPARS to validate them. 

The TABSET subcommand processor indicates whether tabulation 
characters are to be translated into blanks and sets new values for 
tabulation characters (specifies column locations for tabs) by updating 
a table in the EDIT Communication Area. The Line Edit routine 
(IKJEBELE) refers to this table when it is invoked to translate 
tabulation characters into blanks. Depending upon what the user has 
specified, the TABSET subcommand processor: 

• Indicates that tabulation translation is to be performed, if no 
operands or if the ON keyword were specified. 

• Indicates that tabulation translation is not to be performed, if the 
OFF keyword were specified. 

• Sets new values for tabulation characters, if either the ON keyword 
and a tab list were specified, or if the IMAGE keyword and an input 
line of tabs were entered. 

Note: CATABS, a 12-byte area in IKJEBECA, is used as the tabulation 
switch and as a table of the tab character values. The first byte is 
the tabulation switch. The second thru the eleventh bytes contain up to 
10 tab character values. The 12th byte contains X f 00«. 

The TABSET subcommand processor returns control to the controller 
routine. 



g£Qcessing_TAgSET_ Operands 

This topic describes the way in which the TABSET subcommand processor 

operates when particular operands are specified. Table 24, which 

follows this topic, summarizes the operations of the TABSET subcommand 
processor. 



22-0£££3:]l3.s_S£ecif ied 

If no operands are present, IKJEBETA turns on the tabulation switch 
(CATABS in IKJEBECA) which indicates that translation of the tabulation 
settings into blanks is to be performed. The tabulation settings will 
take on the default values specified at Sysgen time on the values 
specified during a previous TABSET subcommand operation in the current 
EDIT session. 

OI-.o^QEZ^Eeiloris^S^ecified 

If the ON or OFF keyword were specified, IKJEBETA sets the tabulation 
switch to perform or not to perform translation of the tabulation 
settings. 
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ON_Keywprd^ and Integer _List. Specified 

If ON and an integer list were specified, e.g., TAB ON (2 8 72), 
IKJEBETA stores values in ascending order in the tabulation table 
(CATABS) and turns the tabulation switch on. 

iMAGE_Keiword_and_In£Ut_Lin^ 

TAB IMAGE is followed by a line containing a "t" for each desired tab 
position to mark the actual column location of the tabulation 
characters. (A character other than a ff t ff is considered as a blank in 
this line.) The tab set character (t) may be entered as either upper or 
lower case. When the IMAGE keyword is specified using tab set 
characters IKJEBETA invokes the GETLINE service routine to obtain the 
line containing the TAB characters, determines the tabulation settings, 
and stores them in the tabulation table. IKJEBETA updates the CAINPROC 
field of the EDIT communication area to indicate the input source of 
the IMAGE line, i.e., terminal input or procedure input. 
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Table 24. Summary of TABSET Operations 



h 



Subcommand 



Operand 



Keyword 



Keyword 
Value 



Modules 
Involved 
In 
Processing 



functional Description 



MO 
ID 



Flow 

Chart 

ID 



H 



TABSET 



None 



None 
or 

ON 



None 



IKJEBEMA 



Receives subcommand from 
coinrand buffer; invokes 
subcommand processor 
(IKJEEETA) . 



02 



IKJEBETA 



Specifies that tabulation 
settings be translated 
into blanks. 



22 



CW-CY 



4 * 

EO 



f 1 

CW-CY 

4 J 

EO 



TAESET 



(integer 
list) 



None 
or 

ON 



None 



IKJEEEKA 



Same function as above. 



IKJEBETA 



Specifies that tabulation 
settings specified in the 
integer list be translated 
into the proper number of 
blanks. 



C2 
22 



+ 1 

CW-CY 



TAESET 



None 



IN.AGE 



None 



IKJEEENA 



Receives subcommand from 
command buffer; invokes 
subcommand processor 
(IKJEBETA) . 



C2 



IKJEEETA 



Treats next input line as 
series of tabset charac- 
ters. Obtains the next 
line from the current 
source of input; deter- 
mines the tabulation set- 
tings from the cccurances 
of f t f in the input line; 
stores these values. 



22 



4- 1 

EO 



TABSET 



None 



OFF 



None 



IKJEBEMA 



Same function as above. 



IKJEEETA 



Specifies that tabulation 
characters be translated 
into single blanks. 



02 
22 



CW-CY 



EO 
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TOP Subcommand Processing 

The TOP subcommand positions the current line pointer to the beginning 
of the utility data set; in an unnumbered data set, the beginning of the 
data set is the position preceding the first record. In a numbered data 
set, line number zero is the beginning. 

The TOP subcommand processor: 

• Reads the first record in the utility data set. 

• Sets the current line pointer to zero. 

• Returns control to the controller routine. 

TOP_Processincj 

This topic describes the way in which the TOP subcommand processor 
operates. Table 25, which follows this topic, summarizes the operation 
of the TOP subcommand processor. Upon receipt of the TOP subcommand, 
the controller routine (IKJEBEMA) calls the command scan routine 
(IKJSCAN) to validate the subcommand. If the syntax is valid, IKJEBEMA 
invokes the TOP subcommand processor (IKJEBETO) . IKJEBETO calls the 
interface routine for the EDIT Access Method (IKJEBUT) to read the first 
record in the data set. (Reading of the first record of the data set is 
indicated by X'04 1 in the option code byte of the parameter list passed 
to IKJEBEUT.) 

IKJEBEUT branches to the read operation routine (IKJEBERR) which uses 
the record locate routine (IKJEBELO) to find the first record of the 
data set. If the data set is empty, indicated by a return code of 4 
from IKJEBEUT, message number IKJ52501I is issued through the message 
selection routine (IKJEBEMS) and put out by IKJPUTL. IKJEBETO sets the 
current line pointer to zero. If the data set is not empty (IKJEBEUT 
return code = 0), IKJEBETO sets the current line pointer to zero. If a 
record exists for line zero, the line to be verified switch (CALNOTOVF 
in IKJEBECA) is turned on. IKJEBETO returns control to IKJEBEMA. If 
record zero does not exist, and if the verify switch (CAVRFYSW in 
IKJEBECA) is turned on, IKJEBETO issues message IKJ52504I with an 
insertion of ,f 0" or "*" depending upon whether the data set is 
line-numbered or not. 
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Table 25. Summary of TOP Operations 
r "T t t 



T 1 

Flow 

Chart 

ID 

+ 1 

CW-CY 



h 



Subcommand 



1 



TOP 



Operand 



None 



Keyword 



None 



Keyword 
Value 



None 



Modules 
Involved in 
Processing 



IKJEEENA 



IKJEEEUT 



Functional Description 



Feci eves subcomirand from 
command buffer; invokes 
subcoir.nr.and processor 

(IKJEBETO) . 



IKJEEETC | Invokes the Access Method | 23 
to find the first record 
in the data set; sets the 
current line pointer to 0. 



Acts as interface to IKJE- 
BEAA which locates the 
first record of the data 
set. 



MO 
ID 



C2 



27 



EP 



1 

ET 



-«L J 
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UP Subcommand Processing 

The UP subcommand moves the current line pointer toward the beginning of 
the utility data set. The number of lines the line pointer will move is 
governed by the value in the operand of the UP subcommand; if no value 
is specified , the current line pointer will be moved one line toward the 
beginning of the data set. Upon receipt of the UP subcommand, the 
controller routine (IKJEBEMA) calls the command scan routine (IKJSCAN) 
to validate the subcommand. If the syntax is valid, IKJEBEMA invokes 
the UP subcommand processor (IKJEBEUP) . IKJEBEUP determines if operands 
are present by checking the status of the operand switch CAOPEBND in 
IKJEBECA) . If operands are present, IKJPARS is called to scan them. 

Depending upon what the user has specified, the UP subcommand 
processor: 

• Reads records toward the beginning of the utility data set until the 
number of records specified by "count" have been read, if an operand 
were specified. 

• Reads the record previous to the record pointed to by the current 
line pointer, if no operand were specified. 

After the specified number of records have been read, the UP subcommand 
processor: 

• Sets the current line pointer to the value of the record last read. 

• Turns the line to be verified switch on. 

• Returns control to the controller routine. 

UP Processing 

This topic describes the way in which the UP subcommand processor 
operates. Table 26, which follows this topic, summarizes the operation 
of the UP subcommand processor. If no operands are present, or after 
the operands have been validated, IKJEBEUP calls the interface routine 
for the EDIT Access Method (IKJEBEUT) to read the first record of the 
data set. (Reading of the first record of the data set is indicated by 
| X'04 1 in the option code byte of the parameter list passed to IKJEBEUT.) 

IKJEBEUT branches to the read operation routine (IKJEBERR) which uses 
the record locate routine (IKJEBELO) to find the first record of the 
data set. If the data set is empty, indicated by a return code of 4 

| from IKJEBEUT, message number IKJ52501I is issued through the message 
selection routine (IKJEBEMS) and put out by IKJPUTL. IKJEBEUP sets the 
current line pointer to zero and returns control to IKJEBEMA. If the 
data set is not empty (IKJEBEUT return code = 0) , IKJEBEUP calls 
IKJEBEUT again, this time to locate the record previous to the current 
record. (Reading of the record previous to the current record is 

I indicated by X'OI' in the option code byte of the parameter list passed 
to IKJEBEUT.) 

IKJEBEUT branches to the read operation routine (IKJEBERR) which uses 
the record locate routine (IKJEBEIO) to find the previous record. If 

I the record cannot be found, message number IKJ52505I is issued 
through the message selection routine (IKJEBEMS) . IKJEBEUP sets the 
current line pointer to the last record referenced, turns the line to be 
verified switch on, and returns control to IKJEBEMA. If the record is 
found, IKJEBEUP determines if the current line pointer has been moved up 
the requested number of lines. If the count operand value has not been 
satisfied, IKJEBEUT is called to read the next previous record in the 
data set. If the count has been satisfied, IKJEBEUP sets the current 
line pointer to the last record referenced. If this last record is the 

I first record in the data set, message number IKJ52505I is issued through 
IKJEBEMS. 
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Table 26. Summary of UP Operations 
r t t t 
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Keyword 
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Functional Description 



MO 
ID 



UP 



count 



None 



None 



IKJEEEMA 



Receives subcommand from 
subcommand buffer; invokes 
subccirirand processor 
(IKJEBEUP). 



C2 



CW-CY 



IKJEEEUF 



Invckes IKJEEEUT tc deter- 
mine if the data set is 
empty , and if it is not, 
to locate the record pre- 
vious to the current reco- 
rd; continues to invoke 
IKJEEEUT to find records 
with lower keys until the 
number of records indi- 
cated by 'count' have been 
located; sets -i;he current 
line pointer to the key 
value cf the last record 
found by the Access 
Method. 



24 



f \ 

ER,ES 



IKJEBEUT 



Acts as interface to IKJE- 
EEAA which locates the 
first record in the data 
set tc determine if the 
data set is empty and 
which locates the record 
previous to the current 
record and reccrds with 
still lower keys until the 
•count' value has been 
satisfied; informs IKJE- 
EEUP whether the data set 
is empty or not and passes 
it the key of the record 
last found by the Access 
Method. 



27 



ET 



< 

CW-CY 

f \ 

ER,ES 



UP 



None 



None 



None 



IKJEBEMA 



Same function as above. 



02 



IKJEEEUF 



Invokes IKJEEEUT tc deter- | 24 
mine if the data set is) 
empty, and if it is not, 
to locate the record pre- | 
vious to the current reco- | 
rd; sets the current line | 
pointer to the key value | 
of this record. 

IKJEEEUT | Acts as interface to IKJE- 1 27 
BEAA which locates the | 
first record in the data) 
set to determine if the | 
data set is empty and| 
which locates the record | 
previous to the current | 
record; IKJEBEUT informs | 
if the data set is empty | 
or passes the key of the | 
record found by the Access] 
Method. 



f \ 

ET 
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VERIFY Subcommand Processing 

The VERIFY subcommand provides for the display of the record pointed to 
by the current line pointer after a portion of the record has been 
altered by the CHANGE subcommand, or after the value of the current line 
pointer has been changed by the operation of an EDIT subcommand 
processor. Upon receipt of the VERIFY subcommand, the controller 
routine .(IKJEBEMA) palls the command scan routine (IKJSCAN) to validate 
the subcommand. If the subcommand is valid, IKJEBEMA invokes the VERIFY 
subcommand processor (IKJEBEVE) , The VERIFY subcommand processor 
indicates whether the user wants a record display or not by setting a 
flag in the EDIT Communication Area. This flag is tested by the CHANGE 
subcommand processor and by the EDIT controller routine, which acts in 
behalf of the other EDIT subcommand processors. Depending upon what the 
user has specified, the VERIFY subcommand processor: 

• Indicates that a record will be displayed when the text of the 
current line or the value of the current line pointer is changed, if 
no operands or the ON keyword were specified. 

• Indicates that a record will not be displayed, if the OFF keyword 
were specified. 

Tiie VERIFY subcommand processor returns control to the controller 
routine. 

I!£2cessin3_VERIFY_0perands 

This topic describes the way in which the VERIFY subcommand processor 

operates when particular operands are specified. Table 27, which 

follows this topic, summarizes the operations of the VERIFY subcommand 
processor. 

No Operands^ Specified 

IKJEBEVE determines if operands are present by checking the status of 
the operand switch (CAOPERND in IKJEBECA) . If no operands were 
specified, IKJEBEVE sets the verify switch (CAVRFYSW) to 1, indicating 
that during the operation of subsequent subcommands, records will be 
displayed. 

2£e£ands_Specif ied 

If an operand were specified, IKJEBEVE calls, IKJPARS to scan the 
operand. If the operand is valid, IKJEBEVE sets the verify switch to 1 
(if ON were specified) or to (if OFF were specified) . 
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Table 27. Summary of VERIFY Operations 
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MO 
ID 



VERIFY 



None 



ON 
or 
None 



None 



IKJEEENA 



Receives subcommand from 
command buffer; invokes 
subcommand processor 
(IKJEBEVE) . 



C2 






VERIFY 



None 



+ 

OFF 



+ 

None 



IKJEEEVE |Turns verify switch (CAVR- 
FYSW) on to indicate that 
every time the text of a 
line is altered, or every 
time the current line 
pointer is changed as a 
result of a subcommand 
operation, the line is to 
be displayed at the 
terminal. 

IKJEEEN.A | Same function as above. 
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EDIT Access Method 

Inherent in the operation of most subcommands is the reading / writing, 
and deleting of records in the utility data set. Records can be read 
into, or written or deleted from the data set sequentially (forward and 
backward) and directly by record key. The EDIT Access Method is the 
portion of the EDIT program which performs these functions. 



STRUCTURE 

The EDIT Access Method comprises four major functional areas: 

• Initialization and Final Processing. 

• Interface. 

• Read, Write, and Delete Operations. 

• Access Method Service Routines. 

The EDIT Access Method handles variable and fixed-length, numbered 
and unnumbered records. 

These records are inserted into data_blocks which reside on a 
direct-access device. When needed, the data blocks are read into one of 
| three buffers. Figures 17 and 18, respectively, describe the formats of 
the data blocks and the buffers. 
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Data Block ( DB 



locator (s) 
Record (s) 

Data Block Field Descriptions 

NUMREC (2 Bytes )-Number of Records in the Data 
Block 

DATASTRT (2 Bytes )-Pointer to where Next Record 
Should Go. 

RECVSP (2 Bytes )-Number of Bytes of Recoverable, 

Unused Space between the Position Pointed 
to by DATASTRT and the End of the Data 
Block. 

LOCATOR (2 Bytes )-Points to a Record. 
ENTRY The Locator Entries are in Ascending 

Sequence Based on Record Key. 




The Following Sequence Illustrates the Changes in 
Data Block Fields when Records are Added and 
Deleted. 



Original Condition - Data Block Contains 3 
Records and No Recoverable Unused Space. 
DATASTRT Field, Pointing to Beginning of Record 
which was Last Entered in the Data Block, Indicates 
that Space Exists for More Records. 



4 


DATMTRT 





» Locator 


Locator y» 


^^ Locator 


m Locator 


-L 


4*^ v^ 


2jP> \ 




4 




40 \ 




7 


T X 




30 




-L 


f t 




1 


T T 



Record Added - New Record with Key of 20 Added 
to Data Block. New Locator for Record is Built 
and Inserted into Proper Position. DATASTRT Field 
is Updated and Now Points to Beginning of New 
Record. 



3 


• DATASTRT 


240 1 


► Locator 


Locator / 


p Locator 






Wv 


A/ 20 






Y 


40 






J 






i 240 Bytes -^Cj 








[ 



Re-ord Deleted - 240-Byte Record with Key of 30 
is Deleted. Locator for the Record is Deleted. 
Locator for Record with Key of 40 is Moved Down. 
Value of 240, Representing Recoverable, Unused 
Space in Area of Data Block Occupied by Records, 
is Inserted in the RECVSP Field. 



TL. 



JT 



Figure 17. EDIT Access Method Data Blocks 
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Buffer Elements 






<w. 



1688 
Bytes 



^ 



BUFCHAIN 



BUFTTR 



Ybu 



=t 



BUFSTATS I BBKCHAIN 



"^1 



BUFREF 






DSDB 



1688 
Bytes 



*-^ 



LLDB or DB 



V^ 



1688 
Bytes 



LLDB or DB 



LLDB or DB 



Buffer 

BUFCHAIN ( 4 Bytes ) - Address of Next 
Buffer Element in Chain, or 
Zero if this is the Last 
Element. 



BUFSTATS 



( 1 Byte ) ■ 
Flags. 



Buffer Status 



BBKCHAIN ( 3 Bytes ) - Address of 

Previous Buffer Element in 
Chain, or Zero if this is the 
First Element. 

BUFTTR ( 4 Bytes ) - TTR of the 

Physical Block which was 
Last Read into the Buffer 
Element, or into which the 
Buffer Element is to be 
Written. 

BUFREF ( 4 Bytes ) - Address of 

Index Entry or Record 
Locator Last Found. 



W 



Buffer 



Figure 18. EDIT Access Method Buffers 
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A fii£££torx_block provides the mechanism for accessing a particular 
record. Contained within each directory block are pointers to data 
blocks or other directory blocks. Associated with each data block is 
the highest key of the records within the block. When a particular 
record is requested the Access Method first searches the directory block 
for the first data block whose highest key is greater than or equal to 
the key of the desired record. When the data block is identified, the 
Access Method reads the record (if the data block is in storage) or 
reads the data block into a buffer (if the block is on the direct-access 
device) and then reads the record. Figure 19 describes the format of 
the directory block. 
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Indices • 




Data Set Directory Block Field Description 



NLEV 



NUMINDEX 



INDEX ENTRY 



■ ( 2 Bytes ) Number of LLDB 
Levels. Zero Level Always 
Points to Data Blocks. 

• ( 2 Bytes ) Nbr of Index 
Entries. 

■ ( 7 Bytes ) 4-Byte Binary Key 
Value and 3-Byte TTR. The 
3-Byte TTR Points to a Data 
Block or to a Lower- Level 
Directory Block. The 4-Byte 
Key Indicates the Highest Key 
Value in the Data Block or 
the Lower -Level Directory 
Block. 



Not^: This Block is Always in the First Buffer 
Position in the Main Storage Assigned 
to the EDIT Access Method. 



Data Set Directory Block (DSDB 




Lower -Level Directory Block Field 
Descriptions 



NLEV 



NUMINDEX 



- ( 2 Bytes ) Level Nbr of this 
LLDB Zero Level Always 
Points to Data Blocks. 

- ( 2 Bytes ) Nbr of Index 
Entries. 



INDEX ENTRY - ( 7 Bytes ) 4-Byte Binary Key 
Value and 3-Byte TTR. The 
3-Byte TTR Points to a Data 
Block or to Another LLDB. 
The 4-Byte Key Indicates the 
Highest Key Value in the 
Data Block or the LLDB. 



Lower- Level Directory Block (LLDB) 

Figure 19. EDIT Access Method Directory Blocks 
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If the data set becomes very large, the number of pointers to data 
blocks may exceed the size of the Directory block. In this case the 
directory block contents are written into two lower- ley el di rectory 
blocks. This operation is called b lo ck_s£li 1 1 i nc[ . (See Figure 20 for a 
description of how this operation is accomplished.) The new directory 
block will now point to two lower-level directory blocks, which in turn 
point to data blocks. If a lower-level directory block becomes full, a 
new lower-level directory block is created by writing half the contents 
of the original into the new. Lower-level directory blocks are also 
stored on the direct-access device. 
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NLEV - Level Number 
(0 Always Points to 
Data Blocks) 



NUMINDEX - 
Number of 
Entries 

Maximum of 

40) 




New DB 



o 



Data Blocks 

A New Record is Entered But Cannot 
be Written Because the Appropriate 
Data Block is Full. 




DSDB 



2 2 



Record 



The New Record is Written into a 
New Data Block. The Directory 
Block Entry for this New Data Block 
Cannot be Written into the 
Appropriate Lower-Level Directory 
Block. 



Half of the Contents of the Full 
LLDB is Written into a New LLDB. 
An Entry for the New Data Block is 
Inserted into the Appropriate LLDB - 
in this Example, the New LLDB. An 
Entry for the New LLDB Cannot be 
Inserted into the DSDB. 



Data Blocks 

The Contents of the DSDB is Written into 
Two New LLDBs. The Directory Block 
Entry for the LLDB Created in Step (3) 
is Inserted into One of these LLDBs. 
These LLDBs are Each Given a Level of 
1 . A Directory Block Entry for Each of 
the Two LLDBs is Inserted into the DSDB. 
The Level of the DSDB is Changed to 2. 



The data set on direct-access which contains the data blocks (and the 
lower-level directory blocks, if neccessary) searched by the EDIT Access 
Method is called the utility data^set . Each unit of storage on the 
device is called a block and is referred to by a TTR . 

INITIALIZATION AND FINAL PROCESSING 

Initialization of the EDIT Access Method consists of acquiring the 
resources needed by the Access Method (the utility data set, a work 
area, buffers) and of loading the Access Method routines into storage. 
Access Method initialization occurrs during the initialization phase of 
EDIT, and whenever an additional utility data set is required by an EDIT 
module. 

Final processing involves freeing the resources acquired during 
initialization. Method of Operation Diagram 26 (foldout) describes the 
method of operation of the EDIT Access Method initialization (IKJEBEUI) 
and final processing (IKJEBEEX) . 



INTERFACE 

The interface receives requests for Access Method functions, selects the 
appropriate operation (read, write, or delete) , and returns results 
(pointers to found records, indications of successful operation, etc.) 
to the caller. The interface is the only agent of communication between 
the Access Method and the subcommand processors. Method of Operation 
Diagram 21 (foldout) describes the method of operation of the interface 
(IKJEBEUT) . 

READ, WRITE, AND DELETE OPERATIONS 

These operations are selected by the interface to perform work for the 
caller of the Access Method. There are three kinds of work performed: 

• Reading operations - locating a particular record or a number of 
records in the utility data set; moving the record to a location in 
storage . 

• Writing operations - locating a particular line in the data set; 
writing a record into the line. 

• Deleting operations - locating a particular record in the data set; 
deleting the record. 

The following diagrams describe the method of operation of the read, 
write, and delete operations: 

• Method of Operation Diagram 28. Write operation (IKJEBEWR) . 

• Method of Operation Diagram 30. Delete operation (IKJEBEDR) . 

• Method of Operation Diagram 29. Read operation (IKJEBERR) . 
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ACCESS METHOD SERVICE ROUTINES 

The Access Method service routines are used by the read, write , and 
delete operations: 

• To handle data records - locating, deleting, moving, 

• To handle the directories - searching, updating, moving (of control 
fields) . 

• To handle the blocks - assigning, reading, writing. 

• To handle the buffers - assigning. 

• To handle I/O - waiting. 

The following diagrams (foldouts) describe the method of operation of 
the Access Method service routines: 

• Method of Operation Diagram 31. Record locate routine (IKJEBELO) . 

• Method of Operation Diagram 32. Record delete routine (IKJEBEDL) . 

• Method of Operation Diagram 33. TTR assignment routine (IKJEBEAD) . 

• Method of Operation Diagram 34. Directory update routine 
(IKJEBEDU) . 

• Method of Operation Diagram 35. Write block routine (IKJEEEWB) . 

• Method of Operation Diagram 36. Buffer assignment routine 
(IKJEBEAS) . 

• Method of Operation Diagram 37. Directory search routine 
(IKJEBEDS) . 

• Method of Operation Diagram 38. Read block routine (IKJEBERB) . 

• Method of Operation Diagram 39. Wait routine (IKJEBEWA) . 
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Section 3: Program Organization 



This section describes the relationships among the modules and csects in 
the EDIT program. Included in this section are: 

• Tables which list the various modules and csects in the EDIT 
program. 

• Program organization diagrams which pictorialize these 
relationships . 

• Module and csect operation tables which describe the operation of 
each module and csect in the EDIT program. 

• Flowcharts. 

All EDIT program modules are named in the form IKJEBExx, where: 

IKJ is the Time Sharing Option identifier 
EB indicates a data set utility 

E indicates the EDIT data set utility 
xx identifies the particular module of the EDIT program. 

The following tables list the functions of and the relationships 
among the modules and csects of the EDIT program. 
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Table 29. Mainline Routines (resident) 
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JIKJEBEDR 


IKJEBEUT 


CALL 


J Delete Record j 




| IKJEBEDS 






| Directory Search j 




jIKJEBEDU 






| Directory Update | 




| IKJEBELO 






| Locate Record | 




IIKJEBEMV 






| Move Data | 




IIKJEBERB 






| Read Block | 




jIKJEBERR 


IKJEBEUT 


CALL 


| Read Record | 




| IKJEBEWA 






| Wait on I/O ] 




jIKJEBEWB 






| Write Block \ 




JIKJEBEWR 


IKJEBEUT 


CALL 


\ Write Record | 
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Table 30. Service Routines (non- 



resident) 

T" 



| Load Module | Csect 



| Called By 



I" 



IKJEBEPS 



IKJEBEPS 
IKJEBEPD 



IKJEBEIN 



Linkage | Function 
+- 



LOAD/CALL 



Table Search 
Processor Data Table 



IKJEBECO 



IKJEBECO 



IKJEBEIN 
IKJEBEME 



LINK 



Initial Copy 



IKJEBEFC 



h 



IKJEBEFC 



IKJEBEFO 
IKJEBEME 
IKJEBERU 
IKJEBESA 



LINK 



Final Copy 



IKJEBEUI 



IKJEBEUI 



IKJEBECO 
IKJEBEIN 
IKJEBERE 



LINK 



Utility Initialization 



IKJEBEEX 



h 



IKJEBEDA 



IKJEBEEX 



IKJEBECO 
IKJEBEMA 
IKJEBERE 
IKJEBEME 
IKJEBEEN 
IKJEBEMR 



LINK 



Utility Exit 



IKJEBEDA 
IKJEBDAM 



IKJEBEFO 
IKJEBEME 
IKJEBERU 



LINK 



Utility Allocation 
Message Text 



IKJEBECI 



IKJEBEMR 



IKJEBECI 



IKJEBEMR 



IKJEBEHE 
IKJEBEFO 
IKJEBEME 
IKJEBERU 

+ 

IKJEBEME 
IKJEBERE 



XCTL 
LINK 
LINK 
LINK 



Command Invoker 



LINK 



Basic Interface 



Table 31. Message Text Loads 



"T T 

| Called By | Linkage 



|Load Module |Csect 



h + + + 

JIKJEBEM1 |IKJEBEM1 | IKJEBEMS | LOAD 
I- + + + 



| Function 
H 



| Message Load 1 



IIKJEBEM2 |IKJEBEM2 | IKJEBEMS | LOAD 



| 

IIKJEBEM3 



-+- 



| Message Load 2 
-4- 



IIKJEBEM4 
I- 



IIKJEBEM3 | IKJEBEMS I LOAD 
-+ +- 



IIKJEBEM4 | IKJEBEMS | LOAD 



| Message Load 3 



+ 



+ 



-+- 



| Message Load 4 

-+ 



IIKJEBEM5 JIKJEBEM5 | IKJEBEMS |LOAD 
j. + + + 



| Message Load 5 



IIKJEBEM6 |IKJEBEM6 | IKJEBEMS | LOAD 



h 



| Message Load 6 



+ 



IIKJEBEM7 
i 



IIKJEBEM7 | IKJEBEMS |LOAD 

.J J - L 



| Message Load 7 
.j 
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Table 32. Subcommand 



Processors Program Organization (Part 1 of 2) 

•T T T 



|Load Modul 


e | Csect 

i _ 


| Called By 


| Linkage 

L 


| Function | 


jIKJEBEBO 


— f. — - 

| IKJEBEBO 


IIKJEBEMA 


|LINK 


| BOTTOM | 

i ,. i 


IIKJEBECG 
I 

i nil _ „ ._ „. 


IIKJEBECG 
| IKJEBESE 


| IKJEBECH 
| IKJEBECG 


| XCTL 
|CALL 


T " ~ 1 

J CHANGE-String Operation | 
| String Search | 

X -1 


r 

| IKJEBECH 

1 
1 
1 
1 

l. . ,. _, 


| IKJEBECH 
IIKJEBCH1 
IIKJEBCH2 
JIKJEBCH3 
IIKJEBCH4 

X 


IIKJEBEMA 


| LINK 

L __ -> «, 


T" " 1 

| CHANGE-Initialization | 
| Parse PCL | 
| Parse PCL | 
| Parse PCL | 
| Parse PCL | 

X J 


IIKJEBECN 
1 

1 


IIKJEBECN 


| IKJEBECH 
IIKJEBECG 

-X 


T 

|XCTL 

| XCTL 
j. 


x — — - —- — j 

|CHANGE-Char Count Operation| 


(IKJEBEDE 

1 
i 


| IKJEBEDE 
JIKJEBED1 
i 


T — " 

IIKJEBEMA 
j. 


|LINK 


| DELETE | 
j Parse PCL | 


r 

IIKJEBEDO 

1 

IIKJEBEFI 

1 

1 

1 

1 


— r 

| IKJEBEDO 
IIKJEBEDL 
x 


T 

| IKJEBEMA 

, j. 


T ■ 

|LINK 
x 


|DOWN I 
| Parse PCL | 


IIKJEBEFI 
IIKJEBFIO 
IIKJEBFI1 
IIKJEBESE 

~— X - 


T 

IIKJEBEMA 
IIKJEBEFI 

A 


T 

ILINK 

| CALL 
x 


|FIND | 
| Parse PCL | 
| Parse PCL | 


r 

f IKJEBEFO 

1 

i 


| IKJEBEFO 
IIKJEBEFL 
4- - 


| IKJEBEMA 


T 

ILINK 


| FORMAT | 
| Parse PCL j 

- X — 4 


IIKJEBEHE 

L _, 


T 

IIKJEBEHE 


| IKJEBEMA 


ILINK 


T I 

JHELP | 

l, ' .. .,„ , ,.- ,., ..... _ ,, .-..,- ,_j 


IIKJEBEIM 

j. .„... _ 


IIKJEBEIM 

X 


1 

JIKJEBEIP 
1 


| XCTL 


t -~ - ~ - ~ "1 

| INPUT-Input Operation | 


IIKJEBEIP 

1 

1 

L ■„__ 


(IKJEBEIP 
IIKJEBXT1 
IIKJEBIP1 


I IKJEBEMA 


ILINK 
x 


| INPUT- Initialization | 
| Validity Check Exit | 
| Parse PCL | 

_.X™ — ■■- — , — -1 


I 

IIKJEBEIS 
1 

L mn _ 


IIKJEBEIS 

| IKJEBIS1 
i 


IIKJEBEMA 


T 

| LINK 


T "1 

| INSERT | 
| Parse PCL | 


r — — . 

IIKJEBELI 

1 

IIKJEBELT 
1 

L 


1 

IIKJEBELI 
IIKJEBLII 

IIKJEBELT 
IIKJEBLT1 


| IKJEBEMA 

IIKJEBEMA 
_, „t ^ ^ _. , — 


| LINK 
ILINK 


| Line Insert | 
| Parse PCL | 

l-LIST | 
| Parse PCL | 


r — 

IIKJEBEME 

t 
1 

L 


T 

IIKJEBEME 
IIKJEBMEM 
IIKJEBMEO 


T 

| IKJEBEMA 


| LINK 

X - 


| MERGE | 
I Message Text | 
| Parse PCL | 

. X J 


{IKJEBEPR 

1 

r, 


| IKJEBEPR 
JIKJEBEPL 

. X 


T 

IIKJEBEMA 

1 ,u 


T 

ILINK 


| PROFILE | 
| Parse PCL | 

- X -1 


IIKJEBERE 

1 

i. 


IIKJEBERE 
IIKJEBRE4 

. _L _ 


1 

| IKJEBEMA 


ILINK 

X - 


_ ^„ ._ ^ ._ „ _„ . ._. .. . -j 
|RENUM | 
I Parse PCL | 

A _._ .„ _ ,_. _,., _ 1 


IIKJEBERU 
1 


" T 

| IKJEBERU 
IIKJEBRUO 


| IKJEBEMA 


ILINK 


T 1 

JRUN | 
j Parse PCL | 



(Part 1 of 2) 
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Table 32. Subcommand Processors Program Organization (Part 2 of 2) 



| Load Module | Csect 



, 1 

Called By | Linkage | Function 



IIKJEBESA 
I 



| IKJEBESA 
JIKJEBSA1 
| IKJEBSA2 
UKJEBSA8 
IIKJEBSA9 



IKJEBEMA | LINK 
I 



+- 



SAVE 
Parse PCL 
Parse PCL 
Message Text 
Issue Messages 



IIKJEBESC 
I 



IIKJEBESC 

| IKJEBSC1 

H- 



IKJEBEMA | LINK 



SCAN (Part 1) 
Parse PCL 



IIKJEBESN 



IIKJEBESN 
+ 



IKJEBESC |XCTL 



SCAN (Part 2) 



4- 



IIKJEBETA 
I 



| IKJEBETA 
IIKJEBTAO 



IKJEBEMA 



| LINK 



I 



TABSET 
Parse PCL 



IIKJEBETO | IKJEBETO 



j. 

IIKJEBEUP 
I 



IKJEBEMA | LINK 



TOP 



+ 

IIKJEBEUP 
| IKJEBUPO 



I- 

IIKJEBEVE 

I 

i 



IKJEBEMA | LINK 



UP 
Parse PCL 



IIKJEBEVE 
| IKJEBVEP 



IKJEBEMA | LINK 



VERIFY 
Parse PCL 



The organization of the EDIT program is shown in the following 
figures: 



• Figure 21. 

• Figure 22. 

• Figure 23. 

• Figure 24. 



EDIT Initialization Program Organization 
EDIT Main Line Program Organization 
EDIT Access Method Program Organization 
IKJEBEAA Program Organization 
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Terminal Monitor 
Program 



ATTACH 



Initialization 



(See MC Diagram 1 ) 



IKJEBEIN 



LOAD 



Message Selection 
Service Routine 



IKJEBEMS 



LINK 



EDIT Access Method 
Initialization 



IKJEBEUI 



LOAD 



EDIT Access Method 



IKJEBEAA 



(See Figure 23) 



XCTL 



Controller 



IKJEBEMA 



(See Figure 22) 
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Terminal 
Monitor Program 



SVC 3 



Controller 



(See MO Diagram 2) 



IKJEBEMA 



LINK 



Subcommand 
Processors 



BOTTOM 



CHANGE 



DELETE 



DOWN 



FIND 



FORMAT 



HELP 



INPUT 



INSERT 



Line Insert/Replace/ 
Delete 



LIST 



MERGE 



PROFILE 



RENUM 



RUN 



SAVE 



SCAN 



TOP 



TABSET 



UP 



VERIFY 



(See MO Diagrams 
5-25) 



EDIT 
Service Routines 



LINK 



EDIT Access Method 
Interface 

IKJEBEUT 



BRANCH 



LINK 



EDIT Access Method 
Final Processing 

IKJEBEEX 



(See Figure 23) 



DELETE 



EDIT Access Method 



IKJEBEAA 



(See Figure 23) 
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Processors 
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IKJEBECO 
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EDIT Access Method 
Initialization 

(See MO Diagram 26) 
IKJEBEUI 
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Write Operation 
IKJEBEWR 


BRANCr 


Access Method 
Service Routines 

^ IKJEBELO 
IKJEBEDL 
IKJEBEAD 
IKJEBEDU 

1 IKJEBEWB 

IKJEBEAS 

IKJEBEDS 

IKJEBERB 

IKJEBEMV 
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LINK 


EDIT Access Method 
Interface 

(See MO Diagram 27) 
IKJEBEUT 
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Delete Operation 
IKJEBEDR 


BRANCI 




DELETE 


















LINK 


EDIT Access Method 
Final Processing 

(See MO Diagram 26) 
IKJEBEEX 




Read Operation 
IKJEBERR 


BRANC 
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(See F 
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IKJEBEUT 



Write Operation 

(See MO 
Diagram 28) 



IKJEBEWR 



Access Method Service Routines 



IKJEBEUT 



Delete Operation 

(See MO 
Diagram 30) 

IKJEBEDR 



IKJEBEUT 



Read Operation 

(See MO 
Diagram 29) 



IKJEBERR 




Record Locate 
(SeeMODiag 31) 

IKJEBELO 



Record Delete 

See MO Diag 32) 

IKJEBEDL 



IKJEBEDU 



TTR Assignment 

(See MO Diag 33) 

IKJEBEAD 



Directory Update 

(See MO Diag 34) 

IKJEBEDU 




Write Block 
^ (See MO Diag 35] 
IKJEBEWB 



IKJEBEDS 
IKJEBERB 



IKJEBEDS 
IKJEBEMV 
| IKJEBERB 
IKJEBEWB 



IKJEBEAS 

IKJEBERB 

IKJEBEWA 

IKJEBEWB 

IKJEBEAD 
IKJEBEDS 
IKJEBERB 
IKJEBEWB 

IKJEBEDL 
IKJEBEDU 

IKJEBEWA 



IKJEBEAD IKJEBERB 



Buffer Assignment 

(SeeMODiag 36) 

IKJEBEAS 



IKJEBEDL 



IKJEBEDU 



Directory Search 

(See MO Diag 37) 

IKJEBEDS 



IKJEBEDS 



IKJEBEDL 
IKJEBEAD 



IKJEBEAS | 
IKJEBEAD 



=3lff 



Read Block 
(See MO Diag 38) 

IKJEBERB 




IKJEBEWA 
IKJEBEWB 
IKJEBELO 

NKJEBERB 



IKJEBEDU 
IKJEBELO ! 

IKJEBEAS 
IKJEBEWA 

IKJEBERB 
IKJEBEWB 



Wait 
(See MO Diag 39) 
IKJEBEWA 



IKJEBEDL 



J 



1 



Move 
IKJEBEMV 



Module and Csect Operation Tables 

IKJEBEAA 

Module Name : IKJEBEAA 

Common., Name: EDIT Utility Access Method 

Entry: From module IKJEBEUT at entry points IKJEBEDR, IKJEBERR, 
IKJEBEWR. 

Attributes: Refreshable, non-privileged, read-only , enabled. 

O£i~£i|tion: Load module containing the following access method csects: 

IKJEBEAD - TTR assignment- routine 
IKJEBEAS - Buffer assignment routine 
IKJEBEDL - Record delete routine 
IKJEBEDR - Delete operation routine 
IKJEBEDS - Directory search routine 
IKJEBEDU - Directory update routine 
IKJEBELO - Record locate routine 
IKJEBEMV - Move record routine 
IKJEBERB - Read block routine 
IKJEBERR - Read operation routine 
IKJEBEWA - Wait routine 
IKJEBEWB - Write block routine 
IKJEBEWR - Write operation routine 

See Csect Operation Tables for description of the operation of these 
csects, 

D ^ta Areas_Def ined by. this Module: See Csect Operation Tables. 

Data_ Areas„Updated by, this Module: See Csect Operation Tables. 

Eou£ill£s_o r _Mo d ul e s^Ca 1 1 e d : See Csect Operation Tables. 

l^iis: See Csect Operation Tables. 

l£ 31s t er _Us a £e : See Csect Operation Tables. 
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IKJEBEAD (CSECT OF IKJEBEAA) 

£sect__Name: IKJEBEAD 

Co m moji_N ame : TTR assignment routine 

En t ry. : 

Branch from csect IKJEBEDU at entry point IKJEBEAD. 
Branch from csect IKJEBEWR at entry point IKJEBEAD. 

At i rib u t e s : 

2E§£§.tion: Obtains a new physical block from direct-access device. 

Data_Areas_Def ined_bx_this_Csect : 

Data_Areas_Updated_by_this_Csect : 

DCBEBQX (in UTILWORK} - pointer to first empty block in utility data set 
BUFFTTR (in buffer) - 

RoMlineS-OE-ltoilHi^s^Called : 

IKJEBEAS - Assigns new buffer 
IKJEBERB - Reads in empty block 
IKJEBEWB - Formats block 
IKJEBEWA - Waits on completion of I/O 

Exits: Return to caller with following return codes: 

- successful operation 
12 - I/O error 

Regis t er_Usacje : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 



Section 3: Program Organization 155 



IKJEBEAE (CSECT OF IKJEBEMA) 

Csect_Name: IKJEBEAE 

Co m mon_N am e : Abnormal end exit routine. 

Entrj: Asynchronously from module IGC0401C at entry point IKJEBEAE. 

liiributes: Refreshable, non-privileged, read-only, enabled. 

2E£rjation: Processes abend situations arising within the Edit Command 
Processor; attempts recovery from Abend situations, and if successful, 
allows the user to save his data set. 

fi^i^_l£^§_£§fin§S_i2_iiii:S_Module : 

CATEMPBF - 
| CASVAREA - 18 word save area in IKJEBECA. 

2at^_i£eas_U£dated_by_this_Module: 

CANXTSVA - in IKJEBECA 

CASVAREA - in IKJEBECA 

CAVRFYSW - in IKJEBECA 

CAABEND - in IKJEBECA 

ECTRTCD - in ECT 
ECTRCDF - in ECT 

Rgu t in es_or_Mo dule s__Cal 1 e d : 

IKJEBMA3 - Input stack clean-up routine 
IKJEBEMS - Message selection routine 

Ixits: Return to caller with following return codes: 

- complete Abend processing 

4 - pass control to retry routine whose address is specified in Register 
(zero) . 

Jte Sis t er_Us a cje : 

Entry 

• All registers are saved. 

• Register contains an entry code. 

- For entry code 0, 4, and 8: 

Register 1 contains the address of the STAE work area. 

- For entry code 12: 

Register 1 contains the user area parameter specified on the STAE 
macro instruction and Register 2 contains the abend completion 
code. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEAS (CSECT OF IKJEBEAA) 

C s e c t _ N a m e : IKJEBEAS 

£o!B2Il-Jiajls : Buffer assignment routine 

Entry: 

Branch from csect IKJEBEAD at entry point IKJEBEAS. 
Branch from csect IKJEBERB at entry point IKJEBEAS. 

A£±£ik u £ es : 

O£eration: Obtains an I/O buffer. 

Data Areas Defined, by this Csect: 

5at§_i£§^s_U£dated_bx_this__Csect: 

S2Miill^s_or__Mo dules_Cal le d : 

IKJEBEWB - Writes out contents of buffer 
IKJEBEWA - Waits on completion of I/O 

Exits: Return to caller with following return code: 

- successful operation 
12 - I/O error 

M^ister^Usa cje : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEAT (CSECT OF IKJEBEMA) 

Csect Name : IKJEBEAT 

Co m mon__Name : Attention exit routine. 

Illi£X : Asynchronously from module IKJEAR05 at entry point IKJEBEAT. 

Attributes: Refreshable, non-privileged, read-only, enabled. 

OBi=£ation: Posts the Attention ECB when the user enters a new 
subcommand after striking the attention key; processes second level 
messages when the user enters a question mark. 

Data_Areas_Def ine d_b^_ t his_Mod ule : 

CAATNWKA - WORK/SAVE area for IKJEBEAT (in IKJEBECA) 

Pa t a_ Are as_Updated_ by _this_. Module: 

| CAATNBUF - in IKJEBECA 
CAATTN - in IKJEBECA 
CAPTIBFR - in IKJEEECA 
CAPTGTBF - in IKJEBECA 

ILoMi.ilie.s_or _Mo dul e s_Cal le d : 

IIKJSCAN - SCAN service routine 

IKJPTGT - PUTGET service routine 

LANGPRCR - language processor or syntax checker 

IKJEBMA2 - input stack clean-up routine 

Exits: Return to caller. 

S§3is t er_Us a c[e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the Attention Exit Parameter 
List. 

Exit 

• All registers are restored. 
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IKJEBEBO 

M_3_Ie_Name : IKJEBEBO 

Co mmon_Name : BOTTOM subcommand processor 

I_i£I : LINK from module IKJEBEMA at entry point IKJEBEBO. 

Itiributes: Refreshable, non-privileged, read-only , enabled. 

OE^ration: Moves current line pointer to the last line in the data set. 

2§t^-^£^s_Def ined_by_thJ.s_Mod.ule : 

CASCWKA - formatted for local storage 
CATEMPBF - contains line to be verified 
CASVAREA - save area in IKJEBECA 

Data_Areas_Updated_by_this_Module: 

CALNTOVF - is set to 1 to indicate a verify request 
CANXTSVA - updated pointer to next available save area 
CACURNUM - current line pointer 

l_£_followin__C SEC TS_are_contained_in_ this_lo a d_modu le : 

IKJEBEBO - main line routine 

52__ines_or_Mo dul es_Called : 

IKJEBEUT - Access method interface routine 
IKJEBEMS - Message selection routine 

I_i__: Return to caller with following return codes. 

- successful operation 
12 - I/O error in utility data set 

Resist er_Usac[e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBECG 

Ho£ule_Name : IKJEBECG 

Co m mon_Name : CHANGE subcommand processor (String Operations) 

Entry: XCTL from module IKJEBECH to entry point IKJEBECG. 

Attributes: Refreshable , non-privileged, read-only, enabled. 

0£££_ii°ll : Performs all text replacement operation. 

Data_Areas_Def ined_b2_.this_M0d.ule: 

CASCWOKA - Variables, parameter lists for IKJEBELE and IKJEBESE 

CABERPL - Buffers for records to be changed 

CATEMPBF - Buffers to build changed record 
CASVAREA - Save area 

DaM_A£Sl^s_Updated_bx_this_Module: 

CANXTSVA - Pointer to next available save area 

CACURNUM - Current line pointer 

CASYNBER - Pointer to record to be passed to LANGPRCR 

CASYN0D2 - Entry code to LANGPRCR 

CASYNMS1 - Pointer to first-level LANGPRCR message 

CASYNMS2 - Pointer to second-level LANGPRCR message 

| CATPUTVF - Verify message switch 

2.o_i_]l e§_or _Mo du 1 e s_Cal 1 e d : 

IKJEBEMS - message selection routine 

IKJEBEUT - access method interface routine 

IKJEBELE - line edit routine 

LANGPRCR - Language processor or syntax checker 

IKJEBESE - String search routine 

Exits: Return to caller with following return codes: 

- successful operation 

8 - unsuccessful completion 
12 - I/O error in utility data set 
XCTL to IKJEBECN 

Jte_i__ii£_2sa _e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• Upon Return to IKJEBEMA all registers except 15 are restored. 

• Register 15 contains a return code. Upon XCTL to IKJEBECN all 
registers except register 1 are restored. 
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IKJEBECH 

Module_N am e : IKJEBECH 

Common_Name: CHANGE subcommand processor (initialization phase). 

Entry: LINK from module IKJEBEMA at. entry point IKJEBECH. 

Aii£ii^£§s: Refreshable, non-privileged, read-only , enabled. 

0£®£^£ion : Checks validity of all CHANGE subcommand operands and reads 
in first record. 

Da€a Areas^ Def ined,, by. this Module; 

CASCWKA (in IKJEBECA) - Variables 

CABFRPL (in IKJEBECA) - Buffer for record to be changed 

CASVAREA (in IKJEBECA) - Save area 

2^ta_Areas_U£dated_bx_thi^ 

CANXTSVA (in IKJEBECA) - Pointer to next Save area 

CASRPLST (in IKJEBECA) - Parameters for PUTLINE, GETLINE and PARSE 

The Following Csects Are Contained in This Load Module : 

IKJEBECH - Main line routine 
IKJEBCH1 - Main PCL 
IKJEBCH2 - Prompt PCL 
IKJEBCH3 - Character count PCL 
IKJEBCH4 - Line count PCL 

l2M£inss__or__M2^]il§s_Called : 

IKJPARS - Validates CHANGE subcommand operands 

IKJEBEMS - Message output 

IKJPUTL - PUTLINE service routine; writes out messages to the terminal 

IKJGETL - GETLINE service routine; obtains terminal input 

IKJEBEUT - Access method interface routine 

Exits: Return to caller with following return codes: 

XCTL to IKJEBECG or IKJEBECN 

- successful operation 

8 - unsuccessful completion 
12 - I/O error in utility data set 

E£ cjis t er_Us age : 

Entry 

• All registers except 13 are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 

• Upon XCTL all registers except 1 are restored. 
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IKJEBECI 

Module_Name: IKJEBECI 

Common, Name: Command invdker 

Entry: 

LINK from module IKJEBERU at entry point IKJEBECI. 

XCTL from module IKJEEEHE at entry point IKJEBECI. 

LINK from module IKJEBEFO at entry point IKJEBECI. 

LINK from module IKJEEEME at entry point IKJEBECI. 

Called asynchronously from supervisor at entry points: STAEEXIT, 

STAIEXIT, STAERTRY. 

Attributes: Refreshable , non-privileged, read-only, enabled, 

Operation: Attaches the TSO command processors for the following EDIT 
subcommands: RUN # MERGE, FORMAT, and HELP. 

Da t a_A r eas_De f ine d__bi_t h is_Mo d ul e : 

CASRWKA (in IKJEBECA) 
CATEMPBF (in IKJEBECA) 
CASVAREA (in IKJEBECA) 

D^t^-A^eas^Updated^x^this^Module: 

CAATTN (in IKJEBECA) CACFLAG2 
CAMODMSG (in IKJEBECA) CATMPLST 
CANXTSVA (in IKJEBECA) 
CAPTIBFR (in IKJEBECA) 
CASRPLST (in IKJEBECA) 
ECTMSGF (in ECT) 
ECTRCDF (in ECT) 
ECTRTCD (in ECT) 

^he following Csects are contained in__ this load module: 

IKJEBECI 
IKJEBCIM 

gQ- u tifigs or Modules Called : 

IKJEBEMS - Message output. 

IKJPTGT - PUTGET service routine; prompts user and obtains responses. 
| Obtains command placed in input stack by RUN command. 

IKJDAIR - Mark DSE entries not in use. 
IKJSTCK - Add end-of-data marker to input stack. Delete procedure 

elements from input stack when error is encountered. 
IKJSCAN - Check for valid command name. 

Exits: Normal - return to caller with following return codes. 

- successful operation 

4 - unsuccessful MERGE or GOFORT operation 

Asynchronous - return to caller from STAIEXIT with return code of 
16. 
- return to caller from STAEEXIT with following return 
codes. 

- no retry 
4 - retry 
8 - unsuccessful completion 
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i 



1§ ijist er_Us a cje : 

Normal entry 

• All registers are saved. 

• Register 1 contains the address of a two-word parameter list. 

Asynchronous entry 

• All registers are saved. 

Normal exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 

Asynchronous exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 

• If retry is specified, register contains the address of a retry 
routine . 
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IKJEBECN 

M & u 1 e _ N a m e : IKJEBECN 

C o m mon _Na m e : CHANGE subcommand processor (character count operations) 

Entry: 

Via XCTL from module IKJEBECH at entry point IKJEBECN. 
Via XCTL from module IKJEBECG at entry point IKJEBECN. 

Attributes: Refreshable , non-privileged, read-only, enabled. 

0E££§t4°.n : Displays specified characters of record at the terminal; 
obtains user's modifications to record; writes modifications into data 
set . 

I2ata_Areas_Def i ne_d _by_ t hi s_Mo d ul e : 

CASCWKA (in IKJEBECA) 

CABFRPL (in IKJEBECA) 

CATEMPBF (in IKJEBECA) 
CASVAREA 

Data_.Areas Updated, by this Module: 

CASRPLST (in IKJEBECA) 

CAAXTSVA (in IKJEBECA) 

CACURNUM (in IKJEBECA) 

CASYNBFR (in IKJEBECA) 

CASYNCD2 (in IKJEBECA) 

CASYNMS1 (in IKJEBECA) 

CASYNMS2 (in IKJEBECA) 

The_Eollowin3_Csects_are_Containe : 

IKJEBECN 

IKJEBEMS - Message output 

IKJEBEDT - Access Method interface routine 
IKJEPUTL - PUTLINE service routine 
IKJEBELE - Line edit service routine 
IKJEGETL - GETLINE service routine 
LANGPRCR - Syntax checker 

Exits;: Return to caller with following return codes. 

- successful operation 
8 - unsuccessful completion 
12 - I/O error in data set 

R e cjis t er_Usa£e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBECO 

M2fiule_Name . IKJEBECO 

Co mm on _N a me : Initial copy routine 

Iain : 

Via LINK from module IKJEBEIN at entry point IKJEBECO. 
Via LINK from module IKJEBEME at entry point IKJEBECO. 

attributes: Refreshable, non-privileged, read-only, enabled. 

Operation: Reads records from an old data set; converts record format 
from old data set format to EDIT Access Method format; writes the 
newly-formatted records into the utility data set. 

2i.t^A£e^§-D§fi:n§^«il_tllis__Module: 

CASRWKA - 
CATEMPBF - 
CASVAREA - 

J2a£^-A£eas_U£dated_by_this_Module: 

CANONUM CAINCRE CANXTSVA 

CADSMODS CASTNUM 

CACURNUM CAPTCDCB 

CADSNOFF CADSNPTR 

CADSN0F2 CADSNPT2 

The Following Csects are Cont a ined_in M this^Load j Module : 

IKJEBECO - 

Routines or ,,, Modules .Called : 

IKJEBEMS - Message output 

IKJEBEUI - Access method initialization routine 
IKJEBEUT - Access method interface routine 
IKJEBEEX - Access method final processing routine 

Ixii§ : Return to caller with following return codes. 

- successful operation 

4 - data set empty 

8 - unsuccessful operation; error 

legist ejr^Usage : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEDA 

JS2£ule_Hame : IKJEBEDA 

Co m mon_Na me : Data set allocation/free routine 

IH±£I : 

from module IKJEBEME at entry point IKJEBEDA. 
from module IKJEBERU at entry point IKJEBEDA. 
from module IKJEBEFO at entry point IKJEBEDA. 

Attributes: Refreshable, non-privileged, read-only, enabled. 

OE^rjition: Generates a dsname and invokes IKJDAIR to allocate a data 
set by that name; frees a data set by invoking IKJDAIR. 

2ata_Areas_Def i ne d_bj_t h i s_Mo d ul e : 

CASRWKA - in IKJEBECA 
CATEMPBF - in IKJEBECA 
CASVAREA - in IKJEBECA 

Data, Areas,, Updated by, this Module: 

CANXTSVA - 
CASADDN - 
CASADISP - 
CASADSN - 
CASADSNL - 
CASAUNCG - 
CASRPLST - 

£he_Follgwing_Csects _ are _Contained inthis Load_Module: 

IKJEBEDA - main line routine 
IKJEBDAM - message control section 

52Miines_or_Mo dul es__Called : 

IKJDAIR - Allocates and frees data sets. 
IKJEBEMS - Message output 

Exits: Return to caller with following return codes. 

- successful operation 
4 - unsuccessful operation 

2§3is i e £_Usa <je : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 



166 EDIT TSO Command Processor PLM - Vol. 3 (Release 21) 



IKJEBEDE 

Module_Name : IKJEBEDE 

£oBlon_Name: DELETE subcommand processor 

Entrx: LINK from module IKJEBEMA at entry point IKJEBEDE. 

itt£ikii£§s: Refreshable, non-privileged, read-only , enabled. 

Operation: Deletes specified lines from the data set and resets the 
current line pointer if the delete operation was successful. 

Data_Areas_Def ined_bx_this_Module: 

CASCWKA - in IKJEBECA 
CATEMPBF - in IKJEBECA 
CASVAREA - in IKJEBECA 

2ata_Areas_U£dated_bx_this_Module: 

CACURNUM - in IKJEBECA 
CALNTOVF - in IKJEBECA 
CANXTSVA - in IKJEBECA 
CASYNBFR - in IKJEBECA 
CASYNCD2 - in IKJEBECA 
CASRPLST - in IKJEBECA 

CACURNUM 

The_Followina_Csects_ar^ 

IKJEBEDE - main line routine 
IKJEBDE1 - PCL for IKJPARS 

22M£ines__or_Mgdul es_Cal led : 

IKJPARS - Validates DELETE subcommand operands 
IKJEBEUT - Access method interface routine 
IKJEBEMS - Message output 
LANGPRCR - Language processor or syntax checker 

l^iis: Return to caller with following return codes: 

- successful operation 
8 - unsuccessful completion 
12 - I/O error in utility data set 

E§Hi§t er_Usa £L§. • 

Entry 

• All registers are saved. 

• Register contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEDL (CSECT OF IKJEBEAA) 

Csect_Name: IKJEBEDL 

Co m mo n_Na me : Record delete routine 

Entry: 

Branch from csect IKJEBEDR at entry point IKJEBEDL. 
Branch from csect IKJEBEWR at entry point IKJEBEDL. 

Jk£ tributes : 

Operation: Deletes record locators from data blocks. 

Pat a_Areas m Defined_by -i this Csect : 

Data Areas^ Updated by_ this_Csect: 

BUFSTATS (in buffer) 
BUFREF (in buffer) 
NUMREC {in data block) 
DATASTRT (in data block) 
RECVSP (in data block) 
Locator (in data block) 
NUMINDEX (in directory block) 

Routines, gr^Mpdules Called : 

IKJEBED5 - Searches directory 
IKJEBERB - Reads directory block 
IKJEBEMV - Moves record locators 
IKJEBEWB - Writes out block 

Ixits: Return to caller with following return codes: 

- successful operation 
8 - data set empty 
12 - I/O error 

Regis t er_JJsa c[e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEDO 

Module Name : IKJEBEDO 

Cgramon_Name: DOWN subcommand processor 

Entrj: LINK from module IKJEBEMA at entry point IKJEBEDO. 

Attributes: Refreshable , non-privileged, read-only, enabled. 

Operation: Moves current line pointer toward end of data set. 

fiata_Areas_Def ine d_b£_t his Jo dule : 

CASCWKA - 
CATEMPBF - 
CASVAREA - 

Data_Areas_Updated_ by_ this, Module ; 

CACURNUM 
CALNTOVF 
CANXTSVA - 
CASRPLST - 

The_Followin2_Csects_are_Containe : 

IKJEBEDO - main line routine 
IKJEBDOO - PCL for IKJPARS 

IL2ii£illJ2S_or_Mo dul e s__Cal le d : 

IKJPARS - Validates DOWN subcommand operands 
IKJEBEUT - Access method interface routine 
IKJEBEMS - Message output 

Exits: Return to caller with following return codes: 

- successful operation 
8 - unsuccessful completion 
12 - I/O error in utility data set 

Regis ter_Usag_e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEDR (CSECT OF IKJEBEAA) 

C § e c t _ N a m e : IKJEBEDR 

Common_Name: Delete operation 

Ini£2= from module IKJEBEUT at entry point IKJEBEDR. 

Attributes : 

Operation: Locates and deletes a particular record. 

Data Areas Defined by this_ Csect : 

Data Areas, Updated by m _this Csect : 

PRIMEKEY (in UTILWORK) - 
SAVEKEY (in UTILWORK) - 

Routines or. ModulesCalled : 

IKJEBELO - Locates a particular record by key. 
IKJEBEDL - Deletes a particular record by key. 

Ixi^s: Return to caller with following return codes: 

- successful operation 
4 - record could not be found 
12 - I/O error 

Jte (jis t er_Usa c[e : 

Entry 

• All registers are saved 

• Register contains the address of an optional new key. 

• Register 1 contains the address of UTILWORK. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEDS (CSECT OF IKJEBEAA) 

Csect_Name: IKJEBEDS 

£ommon_Name : Directory search routine 

IHi£X "• 

Branch from csect IKJEBEDL at entry point IKJEBEDS. 

Branch from csect IKJEBEDU at entry point IKJEBEDS. 

Branch from csect IKJEBELO at entry point IKJEBEDS. 

Itir i b ut es : 

O£e£a£ion: Locates a particular data block by key and TTR address. 

Data_Areas_Def ined_by_this_Csect : 

5§ ta_Areas_Up date d__bx__this_C sect: 

BUFREF (in buffer) - 

-l2]iiilies__or_Mo dul «s__C a 1 1 ed : 

IKJEBERB - Reads next directory block level. 

JdXi±s: Return to caller with following return codes: 

- successful operation 
4 - data block could not be found 
8 - data set is empty 
12 - I/O error 

Register Usage : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEDU (CSECT OF IKJEBEAA) 

Csect Name: IKJEBEDU 

Co m mon_N ame : Directory update routine 

Ilii£I« Branch from csect IKJEBEWR at entry point IKJEBEDU. 

Attributes : 

0£ er a t ion : Adds new block key/TTR combination to a particular directory 
block. 

Data Areas Defined by this Csect: 

Data Areas. Updated, by this.. .Csect ,: 

BUFSTATS (in buffer) 
BUFREF (in buffer) 
DCBNLEV (in UTILWORK) 
NUMINDEX (in directory block) 
NLEV (in directory block) 

IL° u£iliesL_or _Mo du 1 e s__Ca 1 1 e d : 

IKJEBEAD - Assigns a new block. 

IKJEBEDS - Searches directory for block by key. 

IKJEBERB - Reads into storage the next higher directory block level. 

IKJEBEwB - Writes updated block. 

Exits: Return to caller with following return codes: 

- successful operation 
12 - I/O error 

S^Sis t e r __Us ag;e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a three-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 



172 EDIT TSO Command Processor PLM - Vol. 3 (Release 21) 



IKJEBEEN 

MocUIe_Name : IKJEBEEN 

Common_Name: End Subcommand processor. 

IHi£X: Link from module IKJEBEMA at entry point IKJEBEEN when an End 
subcommand is entered. Link from module IKJEBEMA at entrypoint IKJEBEXT 
when a terminal error condition encountered. 

attributes: Refreshable, non-privileged, read-only , enable. 

Operation: IKJEBEEN determines if the user has saved his data set; if 
not, it invokes IKJEBESA. IKJEBEEN terminates Edit by invoking IKJEBEEN 
to unallocate the utility data set, invoking IKJEBESC to perform final 
entry processing for syntax checkers, and cancels the attention and 
abnormal end exits. 

2^ia_Areas_Def ined_bx_this_Module: 

CAMAWKA 
CATEMPBF 
CABFRPL 
CASVAREA 

Data_Areas_U£dated_bx_thisJo4ul.e: 

CAATTNTS 
CAENDSC 
CANXTSVA 
CAOPERND 
| CAPTGTBF 
CAPTIBFR 
CASRPLST 

Ifeg^lQllQgifig— Csects_ are contained in_this_Load_Module: 

IKJEBEEN . - mainline routine 
IKJEBENO - message control section 

Ro u t in es_ar e_mo du 1 es_called : 

IKJEBEMS - message selection routine 
IKJPTGT - Putget service routine 
IKJEBESA - Save subcommand processor 
| IKJEBEEX - Access method final processing routine 
IKJEBESC - Scan subcommand processor. 

J?xi£s: Return to caller with following return codes: 

10 - A subcommand other than End or SAVE was entered in response to 
prompting message. 
12 - End processing complete. 

legist er_Usa cje : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEEX 

Module_Name; IKJEBEEX 

Common Name: EDIT Access Method final processing routine. 

Jntri: Via link from modules IKJEBECO, IKJEBEEN, IKJEBEME, IKJEBEMR and 
IKJEBERE at entry point IKJEBEEX. 

Attributes: Refreshable, non-privileged, read-only, enabled. 

Operation: Performs the final processing on the utility data set and 
deletes the Access Method routines. 

£§t£„ ^£g§g-ggf iftgd by this Module: 

TEMPAREA in DTILWORK 
CASCWKA in IKJEBECA 

5ata_Areas Ti Updated or Freed^by. this, .Module : 

CASRWKA - in IKJEBECA 
Utility Work area (UTILWORK) 

The Following Csects are_Contained_ ,,in_this m Load„ Module : 

IKJEBEEX - Main line routine. 

Routines_or^ Modules Called : 

IKJDAIR - Dynamic Allocation Interface Routine. 
IKJEBEMS - Message Selection Routine. 

Exits: Return to caller. 

ft ggj-stgr, Usage : 

Entry 

• All registers are saved. 

• Register contains the address of UTILWORK. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers are restored. 
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IKJEBEFC 

Mo£ule_Name : IKJEBEFC 

Co m mon_N ame : Final copy routine 

En t rx : 

LINK from module IKJEBEFO at entry point IKJEBEFC. 
LINK from module IKJEBEME at entry point IKJEBEFC. 
LINK from module IKJEBESA at entry point IKJEBEFC. 
LINK from module IKJEBERU at entry point IKJEBEFC. 

Attributes: Refreshable , non-privileged, read-only , enabled. 

Operation: Reads records from the utility data set; converts record 
format from EDIT Access Method to QSAM; writes the newly formatted 
records into a QSAM data set. 

Data_Areas_Def in e d_bj_t his_jlo du le : 

CATEMPBF - in IKJEBECA 
CASRWKA - in IKJEBECA 
CASVAREA - in IKJEBECA 

£a t a_ A r e as_Updated_bx_t his_Module : 

CADSNOFF - CADSN0F2 - 
CADSNPTR - CADSNPT2 - 
CANXTSVA - 

Ibg....ZQl3:Qwing_Csects r _are Contained_in this Load Module: 

IKJEBEFC - Mainline routine 

522J tines_or_Mo dul es_Called : 

IKJEBEMS - Message output 

IKJEBEUT - Access method interface routine 

Exits: Return to caller with following return codes. 

- successful operation 
4 - empty utility data set 
8 - QSAM I/O error 
12 - I/O error in utility data set 

M3J=s t e r_Us age : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEFI 

l2 du 1 e_Na me : IKJEBEFI 

Co m mg n_Na me : FIND subcommand processor 

Entry: LINK from module IKJEBEMA at entry point IKJEBEFI. 

Attributes; Refreshable, non-privileged, read-only , enabled. 

Operation: Updates the current line pointer if successful. 

Data Areas Defined, by this Module: 

CASCWKA - in IKJEBECA 
CABFRPL - in IKJEBECA 
CASVAREA - in IKJEBECA 

£aLt^_4£eas_Updated_bx_this_Module: 

CACURNUM - in IKJEBECA 
CAFIBFR - in IKJEBECA 
CAFINDIS - in IKJEBECA 
CALNTOVF - in IKJEBECA 
CANXTSVA - in IKJEBECA 

The t Following Csects are Contained in this Load_Mgdule: 

IKJEBEFI - Main line routine 

IKJEBFIO - PCL for IKJPARS # string not required case. 
IKJEBFI1 - PCL for IKJPARS / string required case. 
IKJEBESE - String search service routine. 

12 u £ines_or_Mo dul es_Called : 

IKJPARS - Validates FIND subcommand operands 
IKJEBEUT - Access method interface routine 
IKJEBEMS - Message output 
IKJEBELE - Line edit routine 

limits: Return to caller with following return codes. 

- successful operation 
8 - unsuccessful completion 
12 - I/O error in utility data set 

He cjis t er_Us acje : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEFO 

S 2 d]ile _ N a m e : IKJEBEFO 

C g ra ra o n _Na m a : FORMAT subcommand processor 

Entry;: LINK from module IKJEBEMA at entry point IKJEBEFO. 

Attributes: Refreshable, non-privileged, read-only, enabled. 

2E££ation: Builds a model FORMAT command and passes control to module 
IKJEBECI to invoke the system FORMAT command. 

J2!ia_Areas_Def ine d_b^_ t h i s_Mod ule : 

CASCWKA in IKJEBECA 
CABFRPL in IKJEBECA 
CASVAREA in IKJEBECA 

Data Areas, Updated by this Module: 

CASAFNCP - in IKJEBECA 
CANXTSVA - in IKJEBECA 
CASAFLAG - in IKJEBECA 
CASADSN - in IKJEBECA 
CASRPLST - in IKJEBECA 

The_Followin3_Csects_ar e_Contained_in_this_Load_Module : 

IKJEBEFO - Main line routine 
IKJEBFOO - PCL for IKJPARS 

Ro u tines_or__Mo dul es_Ca lie d : 

IKJEBEDA - Data set allocation/unallocation routine. 

IKJEBEUT - Access method interface routine 

IKJEBEMS - Message output 

IKJEBEFC - Copies utility data set into QSAM data set format. 

IKJEBECI - Invokes the system FORMAT command. 

IKJPARS - Validates the FORMAT subcommand operands. 

Exits: Return to caller with following return codes: 

- successful operation or empty data set 
8 - unsuccessful completion 
12 - I/O error in utility data set 

R e c[is t er_Usa £e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEHE 

Module_Name : IKJEBEHE 
I £g llon_Name : HELP/PROFILE subcommand processor 

Entry: LINK from module IKJEBEMA at entry point IKJEBEHE. 

Attributes: Refreshable, non-privileged, read-only, enabled. 

I2£^£^tio^ : Resets the offset field of the subcommand buffer to zero. 
Passes control to IKJEBECI, which invokes the appropriate system command 
processor. 

Data Areas Defined by this Module: 

CASCWKA - in IKJEBECA 
CASVAREA - in IKJEBECA 

Data ^eas ..Updated by _ this, Module: 

CANXTSVA - in IKJEBECA. 

Offset field of subcommand buffer as pointed to by CAPTIBFR. 

The_Followin3_Csects_ar e_Contained_in_this_Load_Module : 

IKJEBEHE - Main line routine 

l'2utines_or_Mo dul es_Called : None 

Uxiis: XCTL to IKJEBECI (Command Invoker) which invokes the system HELP 
or PROFILE command. 

E§£J=s t e r_Usa c[e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• Registers 2 through 12 are restored. 

• Register 1 contains the address of IKJEBECA. 

• Register 15 contains the address of the parameter list for XCTL. 



i 
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IKJEBEIA 

Moclule_Name . IKJEBEIA 

Co m mon_Nam e : Initialization Message Processing Routine 

Entri: Link from module IKJEBEIN at Entry point IKJEBEIA. 

Milifeutes: Refreshable, non-privileged, read-only,, enabled. 

OH^rjition: Selects the appropriate message based upon an index passed 
by the caller. Builds all necessary insertion records for the message. 

Data, Areas, ,.Def ined. by the_ Module: A work area supplied by the calling 
routine. 

CASVAREA 

£ata_Areas_Updated_by_this_Module: 

CADSNLEN 
CADSNOFF 
CADSNPTR 
CADXTSVA 

The_Following._Csects_are_Contain 

IKJEBEIA 

E2ii£iH£S_or_Modu.le s_Cal 1 e d : 

IKJEBEMS - message section routine 

Ixiis: Return to caller with the following return codes. 

- successful operation 
4 - attention interrupt 

8 - "nowait" specified, function not complete 
12 - invalid parameters 
| 16 - conditional getmain failure 

Resist e r_us ag_e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a six word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEIM 

i52£ule_Name : IKJEBEIM 

Common_Name: Input subcommand processor, second load. 

Entry: Via XCTL from module IKJEBEIP at entry point IKJEBEIM. 

Attributes: Refreshable, non-privileged, read-only, enable. 

2£eration: Obtains lines of Data from the user, prepares input data for 
Edit, causes the input data to be placed into the utility data set. 

2a£a_A r ea s_De f ine d_by;_t hi s_Mo d ul e : 

CASCWKA 
CATEMPBF 
CABFRPL 
CASVAREA 

£ai^_l£eas_Updated_by_this_Module: 

CACURNUM 
CAMIMFLG 
CAIMIR 
CAIMLINC 
CAIMLLNO 
CANXTSVA 
CAIMSC 
CAMODMSG 
CASYNBFR 
CASYNCD2 
| CASYNECD 
CASYNIS 
CASTNUM 
CANXTREC 
CASRPLST 

lhe__l2llowin3_Csects_are_ Contain . 

IKJEBEIM 

52iiiilies_or_Mgdul es__Called : 

IKJEBEUT - access method interface routine 

IKJEBELE - line edit service routine 

IKJEBEMS - message selection routine 

LANGPRCR - language processor or syntax checker 

Ixits: Return to caller with the following return codes. 

- successful operation 
12 - I/O error on utility data set 
16 - return code 20 received from LANGPRCR 

E^Sis £ er_Us a g.e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored, 

• Register 15 contains a return code. 
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IKJEBEIN 

M o d u 1 e _ N a m e : IKJEBEIN 

C g m mon__Na me : Initialization routine 

Infe£I : V:La ATTACH from Terminal Monitor Program at entry point 

IKJEBEIN. 

Attributes: Refreshable, non-privileged, read-only, enabled. 

0£§£3Lii2E : Obtains the Edit Communication area; validates operands 
entered on the Edit Command; initializes and/or defaults values in the 
communication area. 

5§ia_Areas__pef ine d_b/_t his_Mod ule : 

See operation tables for csects of IKJEBEIN. 

2a£^_Areas_U£dated_bx_this_Module : 

See operation tables for csects of IKJEBEIN. 

The_Followin2_Csects_are_Co^ 

IKJEBEIN - Allocates Edit data set 

IKJEBIN1 - PCL for Edit command 

IKJEBIN2 - PCL for NEW/OLD prompt 

IKJEBIN3 - invokes message routine IKJEBEIA 

IKJEEIN4 - IKJPARS validity check exit 

IKJEBIN5 - prompt routine for data set type 

IKJEBIN6 - PCL for Data Set Type prompt 

IKJEBIN7 - routine isued to build a fully qualified data set name 

IKJEBIN8 - validates command operands 

5211iilies_or_Mo dul es_Ca 1 le d : 

See operation tables for csects of IKJEBEIN. 

Exits : 

See operation tables for csects of IKJEBEIN. 

Resist er_Us age : 

See operation tables for csects of IKJEBEIN 
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IKJEBEIP 

MQdule_Name: IKJEBEIP 

Common Name: INPUT subcommand processor 

Intrx: Via LINK from module IKJEBEMA at entry point IKJEBEIP. 

Attributes: Refreshable, read-only, non-privileged, enabled. 

Operation: Issues the INPUT mode message; determines if entry was from 
an INPUT subcommand, a null line in Edit mode or from the INSERT 
subcommand; completes initialization for INPUT processing. 

Pata_Areas_ Def ined^by^this, Module: 

CASCWKA - in IKJEBECA 
CATEMPBF - in IKJEBECA 
CABFRPL - in IKJEBECA 
CASVAREA - in IKJEBECA 

Data_ A£^^^2E^i^^— il_iilis_Modiile : 

CAFREEDL - in IKJEBECA 
CAIMCIN -. in IKJEBECA 
CAIMFLG - in IKJEBECA 
CAIMIR - in IKJEBECA 
CAIMLINC - in IKJEBECA 
CANXTSVA - in IKJEBECA 
CAIMLLNO - in IKJEBECA 
CAIMPT - in IKJEBECA 
CAIMSC - in IKJEBECA 
CAIMSFPT - in IKJEBECA 
CAINSAVE - in IKJEBECA 
CAMODMSG - in IKJEBECA 
CANXTREC - in IKJEBECA 
CAPTPRSD - in IKJEBECA 
CASTNUM - in IKJEBECA 
CASRPLST - in IKJEBECA 

Ifeg-fgLlQwing Csects. are_Cgntained^ i in, ii this_Load_fjodule : 

IKJEBEIP - main line routine 

IKJEBXT1 - IKJPARS validity check exit 

IKJEBIP1 - PCL for IKJPARS 

S2]iiines__or_Mg dul es_Calle d : 

IKJPARS - Validates INPUT subcommand operands 
IKJEBEUT - Access method interface routine 
IKJEBEMS - Message output syntax checkers 

liiis: Return to caller with following return codes: 

Normal: XCTL to module IKJEBEIM with a pointer to IKJEBECA in Register 
1. 

Error: Return to caller with the following return codes. 

- successful operation 

8 - unsuccessful completion 
12 - I/O error on utility data set 
XCTL to IKJEBEIM 
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E§3is t ej:_U sa g.e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit (Normal) 

• Register 2-12 are restored, 

• Register 1 contains the address of IKJEBECA, 

• Register 15 contains XCTL parameter list. 

Exit (Error) 

• All register except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEIS 

1° d u 1 e _ N a me : IKJEBEIS 

C o m mo n_Na m e : INSERT subcommand processor. 

Entry: LINK from module IKJEBEMA at entry point IKJEBEIS. 

Attributes: Refreshable, non-privileged, read-only, enabled. 

Operation: Inserts a line of input following the position of the 
current line pointer or causes the input mode to be entered. 

Data Areas, Defined by this Module: 

CASCWKA - in IKJEBECA 
CATEMPBF - in IKJEBECA 
CABFRPL - in IKJEBECA 
CASVAREA - in IKJEBECA 

2^ta_Areas_Updated_bx_this_Module: 

CACURNUM - in IKJEBECA 
CAFREEDL - in IKJEBECA 
CAIMIS - in IKJEBECA 
CAPTPRSD - in IKJEBECA 
CASYNBFR - in IKJEBECA 
CASYNCD2 - in IKJEBECA 
CASYNECD - in IKJEBECA 
CASYNIS - in IKJEBECA 
CASRPLST - in IKJEBECA 
CANXTSVA - in IKJEBECA 

I!ie_Followin3_Csecf s_are_Contain^ : 

IKJEBEIS - main line routine 
IKJEBIS1 - PCL for IKJPARS 

Rout in es_or _Mod u 1 e s_Ca 1 1 e d : 

IKJPARS - Validates INSERT subcommand operands 

LANGPRCR 

IKJEBEMS - Message output 

IKJEBEUT - Access method interface routine 

IKJEBELE - Edits inserted text for tabs and converts lower to upper case 

l2Li£s: Returns to caller with following return codes: 

- successful operation 

4 - invoke input to process insert request 

8 - unsuccessful completion 
12 - I/O error in utility data set 
16 - return code of 20 from LANGPRCR 

R e c[is t er_Usag;e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBELE 

MoclHle_JJame: IKJEBELE 

Co m mon_Na me : Line editing routine. 

E n t r x : 

CALL from module IKJEEEIP at entry point IKJEBELE. 
CALL from module IKJEBELI at entry point IKJEBELE. 
CALL from module IKJEBEIS at entry point IKJEBELE. 
CALL from module IKJEEECH at entry point IKJEBELE. 

Attributes: Refreshable, non-privileged, read-only, enabled. 

2£££ation: Converts lower case characters to upper case; removes 
tabulation characters and shifts text lines according to the positions 
of the tabs; formats lines according to the data set attributes. 

2ai§-l£^^s_Def ined_bx_this_Wodule: 

CASRWKA (in IKJEBECA) - 
CATEMPBF (in IKJEBECA) - 

Data_Areas_Updated_by_this_Module: 

CANXTSVA (in IKJEBECA) - 

52^iiHes_or_Mo dul es_C ailed : None . 

I^iis: Return to caller with following return codes. 

- no line overflow 
4 - line overflow 
8 - GETMAIN failure 

Resist er_Usac[e : 

Entry 

• All registers except 13 are saved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 

• First word of parameter list contains pointer to overflow text, if 
any . 
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IKJEBELI 

Mo d u 1 e_Na«! e : IKJEBELI 

C g m rag n_Na m e : Line-insert/replace/delete subcommand processor 

Entry: LINK from module IKJEBEMA at entry point IKJEBLI1. 

i£i£i feUte s : Refreshable, non-privileged, read-only, enabled. 

Operation: Inserts a new line in a data set, deletes an existing line, 
or replaces an existing line. Called whenever a number or * is the 
first character of an input line while in edit mode. 

Data_Areas_Def ined_bx_this_Mgdule : 

CASCWKA in IKJEBECA 
CATEMPBF in IKJEBECA 
CABFRPL in IKJEBECA 
CASVAREA in IKJEBECA 

Data_Areas_U£da£ed_by_this_Module : 

CACURNUM - in IKJEBECA 

CAFREEDL - in IKJEBECA 

CALNTOVF - in IKJEBECA 

Subcommand buffer 

CAPTPRSD - in IKJEBECA 

CASYNBFR - in IKJEBECA 

CASYNCD2 - in IKJEBECA 

CASYNECD - in IKJEBECA 

CASRPLST - in IKJEBECA 

CANXTSVA - in IKJEBECA 

The_Fgllowin£_Csects_are_Cgntained : 

IKJEBELI - main line routine 
IKJEBLI1 - PCL for IKJPARS 

Rout in es_or_Modul e s_Call e d : 

IKJEBEUT - Access method interface routine 

IKJEBELE - Edits input line for tabs and upper case characters 

IKJPARS - Validates line-insert/delete/replace subcommand operands 

IKJEBEMS - Message output 

LANGPRCR 

Ixi£s_: Return to caller with following return codes: 

- successful operation 

8 - unsuccessful completion 
12 - I/O error in utility data set 
16 - Return code of 20 from LANGPRCR 

Resist er_Us a c[e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBELO (CSECT OF IKJEBEAA) 

C§ect_Name: IKJEBELO 

£211211 -la me : Record locate routine 

En t rj : 

Branch from csect IKJEBEDR at entry point IKJEBELO. 

Branch from csect IKJEBERR at entry point IKJEBELO. 

Branch from csect IKJEBEWR at entry point IKJEBELO. 

Attributes : 

O£££ation: Finds a particular record by key. 

£ata_Areas_Def ined_b2_this_Csect : 

P§i^«l£^s_U£dated_bx_this_Csect: 

PRIMEKEY (in UTILWORK) 
BUFREF (in buffer) 

2.2iitilies__or ..Module s_Cal 1 e d : 

IKJEBEDS - Searches directory for data block containing a particular 

key . 
IKJEBERB - Reads data block into storage. 

Exits: Return to caller with following return codes: 

- successful operation 
4 - record could not be found 
8 - data set is empty 
12 - I/O error 

Insist er_Usac[e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBELT 

Mo d u le_Na m e : IKJEBELT 

Co m nion_Na me : LIST subcommand processor 

Intrx: LINK from module IKJEBEMA at entry point IKJEBELT. 

attributes: Refreshable, non-privileged, read-only, enabled. 

2E££sL£ion: Writes out one or more lines from the utility data set. 

Data_Areas_Def ined__by;_this_Module : 

CABFRPL in IKJEBECA 
CASCWKA in IKJEBECA 
CASVAREA in IKJEBECA 

Data_Areas_U£dated_bx_this_Module : 

CACURNUM - in IKJEBECA 
CANXTSVA - in IKJEBECA 
CASRPLST - in IKJEBECA 

Th§_£ollowin£_Csects_are_Contained 

IKJEBELT - main line routine 
IKJEBLT1 - PCL for IKJPARS 

12 u tines_or_Mo dul es_Calle d : 

IKJPARS - Validates LIST subcommand operands 

IKJEBEUT - Access method interface routine 

IKJPUTL - PUTLINE service routine; writes out messages to the terminal 

IKJEBEMS - Message output 

Ix.A±s_: Return to caller with following return codes: 

- successful operation 
8 - unsuccessful completion 
12 - I/O error 

E^Hi^ t er_Usa c[e : 

Entry 

• All registers except 13 are saved. 

• Register 1 contains the address of IKJEBECA. 

• Register 13 contains the address of a save area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEMA 

I2 d u 1 e _ N a m e : IKJEBEMA 

Cg_ m mon _Na me : Edit controller 

Intrx: Via an XCTL from module IKJEBEIN to entry point IKJEBEMA. 

attributes: Refreshable, non-privileged, read-only, enabled. 

Op.erat.ion: Load module containing the following control sections: 

Data_Areas_Def i ne d _bx_t h i s_Mo d ul e : See operation tables for csects of 
IKJEBEMA. 

Data_Areas_Updated_bx_this_Module: See Operation table for csects of 

IKJEBEMA. 

The_Following__Csects_are^ 

IKJEBEMA - Main line control routine 

IKJEBMA1 - Message processing routine 

IKJEBMA2 - buffer and stack clean-up routine 

IKJEBMA8 - IBM subcommand table 

IKJEBMA9 - USER subcommand table 

IKJEBEAE - abnormal end exit 

IKJEBEAT - attention exit 

IKJEBEUT - access method interface routine 

See CSECT operation tables for description of the operation of these 
csects. 

l°-HiiH es_or_Mo dule s_Cal 1 ed : See operation tables for csects o.f 

IKJEBEMA. 

Exits: See operation tables for csects of IKJEBEMA. 

l§£is t er__Us acje : See operation tables for csects of IKJEBEMA. 



Section 3: Program Organization 189 



IKJEBEMA (CSECT OF IKJEBEMA) 

Module_Name : IKJEBEMA 

Co m mon_Name : Edit main line control routine. 

Entri: XCTL from module IKJEBEIN at entry point IKJEBEMA. 

A£i£i^^£^s: Refreshable, non-privileged # read-only, enabled. 

02££i|tion: Obtains EDIT subcommands from the terminal user; selects the 
mode (edit or input) of EDIT operation; invokes the subcommand 
processors; terminates the EDIT function when unrecoverable errors 
occur; performs the END subcommand function. 

Da ta_Areas_Def ined_by_this_Module : 

CAMAWKA - in IKJEBECA 
CABFRPL - in IKJEBECA 
CASVAREA - in IKJEBECA 

^3:i^_4£eas_U£dated_by;_this_Module: 

CAATTNIS - in IKJEBECA 

CAIMSC - in IKJEBECA 

CAINITSC - in IKJEBECA 

CALNTOVF - in IKJEBECA 

CAMOBMSG - in IKJEBECA 

CANXTSVA - in IKJEBECA 

CAOPERND - in IKJEBECA 

CAPICHK - in IKJEBECA 

CAPTGTBF - in IKJEBECA 

CAPTIBFR - in IKJEBECA 

CAPTLE - in IKJEBECA 

CAPTRTRY - in IKJEBECA 

CAPTSCMD - in IKJEBECA 

CAPTUT - in IKJEBECA 

CASCMDLN - in IKJEBECA 

CASCRC20 - in IKJEBECA 

CASTAEPL - in IKJEBECA 

CASTAXPL - in IKJEBECA 

CASRPLST - in IKJEEECA 

CATPUTVF - in IKJEBECA 

ECTMSGF in ECT 

ECTSCKD in ECT 

IKJEEECA - EDIT Communication Area 

^2Miines_or_Mo dul es_Called : 

IKJEBEMS - Message output 

IKJEBEIP - INPUT subcommand processor 

IKJEBELI - Line insert/replace/delete subcommand processor 

IKJEBEEX - Access method final processing routine 

IKJEEEBO - BOTTOM subcommand processor 

IKJSCAN - SCAN service routine 

IKJPTGT - PUTGET service routine; prompts user and obtains responses. 

IKJEBECH - CHANGE subcommand processor 

IKJEBEFO - FORMAT subcommand processor 

IKJEBELT - LIST subcommand processor 

IKJEEERE - RENUM subcommand processor 

IKJEBEDE - DELETE subcommand processor 

IKJEBEHE - HELP subcommand processor 

IKJEBEME - MERGE subcommand processor 

IKJEBERU - RUN subcommand processor 

IKJE5ED0 - DOWN subcommand processor 

IKJEBEIS - INSERT subcommand processor 
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IKJEBEPR - PROFILE subcommand processor 

IKJEEESA - SAVE subcommand processor 

IKJEBEFI - FIND subcommand processor 

IKJEBESC - SCAN subcommand processor (first load) 

IKJEBETA - TABSET subcommand processor 

IKJEBETO - TOP subcommand processor 

IKJEBEUP - UP subcommand processor 

IKJEBEVE - VERIFY subcommand processor 

IKJEBEEN - END subcommand processor 

IKJEBEXT - END subcommand processor, abnormal termination portion 

IKJEBMA1 - Message processing routine 

IKJEBMA2 - Input stack clean-up routine. 

Exits: Return to the Terminal Monitor Program with following return 

codes: 

- normal completion 
12 - abnormal termination 

Resist e r_Usac[e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEEEME 

Module_Name : IKJEEEME 

Co m mon_Na me : MERGE subcommand processor. 

lUili: LINK from module IKJEBEMA at entry point IKJEBEME. 

M±£iku£es: Refreshable, non-privileged , read-only , enabled. 

Operation: This subcommand processor will invoke the system MERGE 
command to either copy all or a part of the Edit data set into itself at 
some specified or merge all or part of another data set into the one 
being edited. 

JQata_Areas__Def ined_by;_this_Module : 

CASCWKA in IKJEBECA 
CABFRPL in IKJEBECA 
CASVAREA in IKJEBECA 

2ata_ A£^^s_Updat e d_by__t his_Mod u 1 e : 

CAATTNIS - in IKJEEECA 

CADSMODS - in IKJEBECA 

CAIMLLNO - in IKJEBECA 

CANXTSVA - in IKJEBECA 

CAPTPDCB - in IKJEBECA 

CAPTCDCB - in IKJEBECA 

CAPTPRSD - in IKJEBECA 

CASAFLAG - in IKJEBECA 

CASAINCP - in IKJEBECA 

CASAUNCG - in IKJEBECA 

CASRPLST - in IKJEBECA 

The_Followin3_Csects_are_Contain : 

IKJEEEME - Mainline routine 
IKJEBMEM - Message control section 
IKJEBMEO - PCL for IKJPARS 

12 u£iHes__or_ Mo dul es_Cal 1 e d : 

IKJPARS - Validates MERGE subcommand operands 

IKJEBEDA - Data set allocation/unallocation service routine 

IKJEBEFC - Copies utility data set into QSAM data format 

IKJEBECI - Invokes the system MERGE command. 

IKJEBECO - Converts record format from old data set format to EDIT 

Access Method format. 
IKJEBEME - Merged data set translation routine. 

I^its: Return to caller with following return codes: 

- successful operation 

8 - unsuccessful completion 
12 - I/O error in utility data set 
16 - syntax checker not operational 

Re cjis t er_Usag: e : 
Entry 

• All registers except 13 are saved. 

• Register 1 contains the address of IKJEBECA. 
Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEMR 

Module_Jiame : IKJEBEMR 

Coil2 n ._IilI!l§ : Merged data set translation routine. 

En t ri : 

from module IKJEBERE at entry point IKJEBEMR. 
from module IKJEBEME at entry point IKJEBEMR. 

Attributes: Refreshable, non-privileged, read-only, enabled. 

2£§£^£i2H : Re-translates the ITF reverse Polish data set after a 
successful merge of renumber operation. 

5^i^_^£^§.2^fill§^_il_this_Module: 

CASRWKA - in IKJEBECA 
CATEMPBF - in IKJEBECA 
CASVAREA - in IKJEBECA 

Da ta_Areas_Upd ate d_bx_this_ Module: 

CAMODMSG - in IKJEBECA 

CANXTSVA - in IKJEBECA 

CAPTPDCB - in IKJEBECA 

CASYNBFR - in IKJEBECA 

CASYNCD2 - in IKJEBECA 

lll£_£2ll2win.3_Csects_are_C^ : 

IKJEBEMR - main line routine 
IKJEBMRM - Messages control section 

S2iitilies_or _Mo dul e s__Ca 11 ed : 

IKJEBEUT - Access method interface routine 
LANGPRCR - Language processor or syntax checker 
IKJEBEEX - access method final processing routine 

Ixi£s_: Return to caller with following return codes. 

- successful operation 

4 - unsuccessful operation 

8 - syntax checker not operational 

Regis t e r _U s a g.e : 

Entry 

• Ail registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEMS 

Mo cl u 1 e _ N a me : IKJEBEMS 

Co m mon_N ame : Message selection routine. 

Intri-* Via a branch from modules IKJEBEBO, IKJEBECG, IKJEEECH, 
IKJEBECI, IKJEBECN, IKJEBECO / IKJEBEDA, IKJEBEDE, IKJEBEDO, IKJEBEEN, 
IKJEBEEX, IKJEBEFC, IKJEBEFI, IKJEBEFO, IKJEBEIM, IKJEBEIP, IKJEBEIS, 
IKJEBELI, IKJEBELT, IKJEBEMA, IKJEBEME, IKJEBEMR, IKJEBEPR, IKJEBERE, 
IKJEBERM, IKJEBESA # IKJEBESC, IKJEBESN, IKJEBETA, IKJEBETO, IKJEBEUI, 
IKJEBEUP, and IKJEBEVE. 

Aii£iiMi^§ : Refreshable, non-privileged , read-onl-y, enabled. 

Operation: Selects and issues message requested by calling module. 

£§il_l£^s_Def ine d_by_ t h i s_Eod ule : 

CAMSWKA - in IKJEBECA 
CATEMPBF - in IKJEBECA 

Data_Areas_U£dated_by_this_Module : 

CASRPLST - in IKJEBECA 

CANXTSVA - in IKJEBECA 

CAPTMSGM - in IKJEBECA 

CATPUTVF - in IKJEBECA 

The_Followin3_Csects_are_Contained 

IKJEBEMS - Main line routine 

l°u t ines_or_Mo dul es__Called : 

IKJPUTL - PUTLINE service routine; issues messages. 

Exits: Return to caller with following return codes from PUTLINE. 

- successful operation 

4 - attention interrupt 

8 - f NOWAIT f specified, function not complete 
12 - invalid parameters 
16 - conditional GETMAIN not satisfied. 

Re <j[is t er_Usac[e : 

Entry 

• All registers are saved. 

• Register contains the address of IKJEBECA. 

• Register 1 contains the address of a three-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEMV (CSECT OF IKJEBEAA) 

C s e c t_ N am e : IKJEBEMV 

Cgmmon_Name: Move routine 

Jn t 12 : 

Branch from csect IKJEBEDL at entry point IKJEBEMV. 

Branch from csect IKJEBERR at entry point IKJEBEMV. 

Branch from csect IKJEBEWR at entry point IKJEBEMV. 

22§£^£i2H : Moves records. 
5^i^_l£^^s__Def ined_b2_this_Csect : 
2^ia_Areas_Updated_b2_this_Csect : 
12 uiilL es_or _ Mo dul es_Ca 1 le d : None. 
Exits: Return to caller. 
l§£is t er_Us a^e : 

Entry 

• All registers are saved. 

• Register contains the length of the data to be moved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers are restored. 
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IKJEBEPD (CSECT OF IKJEBEPS) 

Mo d u 1 e _N a m e : IKJEBEPD 

Co mmo n _Na me : Processor data table. 
I Entry ; NA 

Attributes: Refreshable, read-only , non-privileged, enabled. 
I Oblation: Contains processor dependent information, is not executable 

Da ta_A reas_Def ined__bx_this__Module : N A 

Data Areas Updated by this Module : NA 

T h e_f o llowi ng._Cse c t s_ar e_Con t a in ed_i n_t his_Lo a d_Modu 1 e : N A 

H°_ut i n es_or __Ko d ul e s__Cal 1 e d : None 
| Exits : NA 

Register Usage : NA 
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IKJEEEPS 

Module_Nanie : IKJEBEPS 

Common_Name: Processor data table search routine. 

Jjiitrx: Via a LOAD and CALL from any module requiring processor 
dependent information at entry point IKJEBEPS. 

ik£i£ifeii£§s: Refreshable, non-privileged, read-only, enabled. 

Operation: Searches IKJEBEPD (processor data table, which is the second 
csect of the load module) for processor-dependent information relating 
to a particular data set type. 

Data_Areas_Def ine d_b/_t his_Mo dul e : See operation tables for csects of 
IKJEBEPS. 

IKJEBEPD (second csect of IKJEBEPS) - processor data table. 

2at^-^£e^§_U£dated_bx_this_Module: See operation table for csects of 
IKJEBEPS. 

S.°.^tiH§§- -£_li2.Slli§§«£3.1i^ : ~ ee operation table for csects of IKJEBEPS. 

IKJEBEPS - Processor Search Routine 
IKJEBEPD - Processor Data Table. 

Ixii§: Return to caller with following return codes. See operation 
tables for csects of IKJEBEPS. 

- successful operation; entry found in table 
4 - entry not found 

Regis ter_Usage : See operation tables for csects of IKJEBEPS. 

Entry 

• All registers except 13 are saved. 

• Register 1 contains the address or complimented address of an 
eight-byte field containing the data set type name for which 
information from the processor data table is required. 

• Register 13 contains the address of a save area. 

Exit 

• All registers except 0, 1, and 15 are restored. 

• Register contains 

• Register 1 contains the address of the found table entry. 

• Register 15 contains a return code. 
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IKJEBEPS (CSECT OF IKJEBEPS) 

I2 <1 u I e _ Na m e : IKJEBEPS 

Co m mo n _ Na m e : Processor Table Search Routine 

Entry;: Via LOAD/CALL at entry point IKJEBEPS. 

attributes: Refreshable, non-privileged, read-only, enabled. 

OReration: Using the search argument passed this routine, search the 
Processor Table for an equal compare. 

The._l2lIpjfin3_Csects^^ Does not apply. 

2§i^_ Ar§ls_ Define d_b^_t hi s_ Mo dule : None. 

£§£ a_A£f~.§s__ Up d a t e d_ try_ t h i s__Mo d u 1 e : None. 

52^£iH£s_or_Mo dul es_Cal le d : None. 

Exits: Return to caller with the following return codes: 

- Register 1 contains the address of the requested table entry. 
4 - Requested table entry not found. 

R e^is t er_JJsa £§_ : 

Entry 

• All registers except 13 are saved. 

• Register 1 , if negative, contains the complemented address of the 
search argument for data set name gualifers; if positive, contains 
the address of the search argument for data set name qualifers. 

Exit 

• All registers except 1 and 15 are restored. 

• Register 1 contains a pointer to the table entry requested for 
return code 0. 

• Register 15 contains a return code. 
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IKJEBERB (CSECT OF IKJEBEAA) 

Csect_Name: IKJEBERB 

Co m mo n_N ame : Read block routine 

III t£X : 

Branch from csect IKJEBEAD at entry point IKJEBERB. 

Branch from csect IKJEBEDL at entry point IKJEBERB. 

Branch from csect IKJEBEDS at entry point IKJEBERB. 

Branch from csect IKJEBEDU at entry point IKJEBERB. 

Branch from csect IKJEBELO at entry point IKJEBERB. 

Attributes : 

22^£^£ion: Reads a particular block into storage. 

D§ta_Areas_Def ine d_J:/_t his_C se c t : 

2§£^_A£§^s_Updated_bx_this_Csect: 

BUFTTR (in buffer) 

Ro u tines_or_Mgdul es__Called : 

IKJEBEAS - Assigns a buffer. 

IKJEBEWA - Waits on completion of I/O. 

IECPCNVT - Converts TTR to actual track address 

Exits: Return to caller with following return codes: 

- successful operation 
12 - I/O error 

H§ 3is t e r_Usa g.e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 



Section 3: Program Organization 199 



IKJEBERE 

12 d u 1 e _ N a m e : IKJEBERE 

Common_Name: RENUMBER subcommand processor. 

Entry.: LINK from module IKJEBEMA at entry point IKJEBERE. 

attributes: Refreshable, non-privileged, read-only, enabled. 

QR££ation: Renumbers a selected portion or the entire data set; numbers 
a previously unnumbered data set. 

£ata_Areas__Def ined_bx_this_Module: 

CABFRPL - in IKJEBECA 
CASCWKA - in IKJEBECA 
CATEMPBF - in IKJEBECA 
CASVAREA - in IKJEBECA 

Data_Areas_Updated_by_this_Modul 

CACURNUM - in IKJEBECA 
CADSMODS - in IKJEBECA 
CAI.MPT - in IKJEBECA 
CAIMFLG - in IKJEBECA 
CAIMLINC - in IKJEBECA 
CAIMLLNO - in IKJEBECA 
CAINCRE - in IKJEBECA 
CALNTOVF - in IKJEBECA 
CANONUM - in IKJEBECA 
CANXTSVA - in IKJEBECA 
CAPTPDCB - in IKJEBECA 
CAPTCDCB - in IKJEBECA 
CASTNUM - in IKJEBECA 
CASYNCD2 - in IKJEBECA 
CASYNLN - in IKJEBECA 
CASYN.MS1 - in IKJEBECA 
CASYNSW - in IKJEBECA 
CASRPLST - in IKJEBECA 

The Following Csects_ are Contained in this Load Module: 

IKJEBERE - Main line routine 
IKJEBRE4 - PCL for IKJPARS 

Ro u t in es _ or , T Modules,. Called : 

IKJPARS - Validates RENUM subcommand operands 

IKJEBEMS - Message output 

IKJEBEUT - Access method interface routine 

IKJEBEUI - Access method initialization routine 

IKJEBEEX - Access method final processing routine 

IKJEBERN - BASIC renumber routine 

IKJEBEMR - Data set translate routine 

Exits: Return to caller with the following return codes. 

- successful operation 

8 - unsuccessful completion 
12 - I/O error in utility data set 
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E§2ist er_Usa<ge : 

Entry 

• All registers are saved, 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEEN 

Common a< Name: BASIC Renumber service routine 

Intrx: LINK from IKJEBERE at entry point IKJEBERN 

Attributes: Refreshable , non-privileged, read-only , enabled 

Operation: Renumbers a selected part on the entire BASIC data set; 
updates line number references in statements. 

P^fe a _^geas_Defined by. t this, Module: 

CASRWKA 

CATEMPBF 

CASVAREA 

2aLi§_A£§.^s_U£dated_by_this_Module: 

CACURNUM 
CAIMLINC 
CAIMLLNO 
CAINCRE 

lbg,.?QiiQwing[,„Csects_are_Contained in this Load Module: 

IKJEBERN 

Routines or, Mpdules_Called : 

IKJEBEMS 
IKJEBEUT 

Exits: Return to caller with following return codes: 

- successful operation 

4 - syntax error in data set (close new data set) 

8 - I/O error (close old data set) 

Segist e r_Us a^ge : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a parameter list* 

Exit 

• All registers are restored. 

• Register 1 contains the address of a parameter list. 
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IKJEBERR (CSECT OF IKJEBEAA) 

Cs e c t__N am e : IKJEBERR 

Common_Name: Read operation routine 

Entry: From module IKJEBEUT at entry point IKJEBERR. 

Attributes : 

O£££ation: Reads a particular record into storage. 

£ata_Areas_Def ine. d_bx_ t h i s_C se c t : 

J2^i^_A£§ls_U£dated_b2_this_Csect : 

PRIMEKEY (in UTILWORK) 
SAVEKEY (in UTILWORK) 

Routines_gr_Mgdules_Called : 

IKJEBELO - Locates a particular record by key. 

IKJEBEMV - Moves the located record to a particular place in storage. 

Ixi±s_: Return to caller with following return codes: 

- successful operation 
4 - record could not be found 
12 - I/O error 

Re 31s t e r_Us acje : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a one- to three-word parameter 
list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBERU 

Module_Name: IKJEBERU 

Common Name; RUN subcommand processor. 

Entry: ATTACH from module IKJEBEMA at entry point IKJEBERU. 

Attributes; Refreshable , non-privileged, read-only, enabled. 

Operation; Builds a command for the system RUN command processor; calls 
ITF to execute an ITF data set. 

Data Areas^ Defined, by^this, Module; 

CASCWKA - in IKJEBECA 
CABFRPL - in IKJEBECA 
CASVAREA - in IKJEBECA 

2^ t a_A r eas_U£da t e d_bx_ t hi s_Mo d ul e : 

CAMODMSG - in IKJEBECA 
CANXTSVA - in IKJEBECA 
CASADISP - in IKJEBECA 
CASADSNL - in IKJEBECA 
CASYNBFR - in IKJEBECA 
CASYNCD2 - in IKJEBECA 
CASYNSW - in IKJEBECA 
CASYNWA - in IKJEBECA 
CASRPIST - in IKJEBECA 

111 §_F o 1 1 o w i ng;_ C s e c t s_a r e_ Co n t ained_in_ t his, Load^ Module ; 

IKJEBERU - Main line routine 
IKJEBRUO - PCL for IKJPARS 

l2Miines_or_Mgdul es_Called : 

IKJPARS - Validates RUN subcommand operands. 

IKJEBEDA - Allocates and frees data set. 

IKJEBEMS - Message output. 

IKJEBEFC - Copies utility data set into QSAM data set format. 

IKJEBEUT - Access method interface routine. 

IKJEBECI - Command invoker routine 

IKJSTCK - Stack routine 

LANGPRCR - Language processor or syntax checker. 

Ixi£s: Return to caller with following return codes. 

- successful operation. 
8 - unsuccessful completion 
12 - I/O error on utility data set. 

R e g;i s t er_Usa £§_ : 

Entry 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBESA 

flo & H 1 e _ I a m e : IKJEBESA 

C gimoji_N a me : SAVE subcommand processor, 

Entry: from module IKJEBEMA at entry point IKJEBESA. 

Attributes: Reentrant. 

2£§£§.tion: Causes the utility data set to be saved as the permanent 
data set with the name specified on the SAVE subcommand or with the name 
specified on the EDIT command. 

Data_Areas_Def ined by this_Module: See operations tables for csect of 

IKJEBESA. 

2^ta_Areas_Updated_b2_this_Module: 

CASADSN - DSNAME of SAVE data set 
CASAMEMB - Membername of Save data set 
CASADDN - DDNAME of SAVE data set 
CASAPSWD - Password for SAVE data set 

The_Following._Csects_a^ 

IKJEBESA - Main line routine 

IKJEBSA1 - PCL for IKJPARS (SAVE subcommand) 

IKJEBSA2 - PCL for IKJPARS (prompt for membername) 

IKJEBSA8 - Message control section 

IKJEBSA9 - Message processing routine 

19. u tin es_or_Module s_Called : 

IKJDFLT - Fully-qualifies data set name and searches catalog 

IKJPARS - Validates SAVE subcommand operands 

IKJEBEMS - Message output 

IKJDAIR - Allocates SAVE data set 

IKJEBEFC - Copies utility data set into QSAM data set format. See 

operations tables for csect of IKJEBESA. 
IKJPTGT - Issues prompt messages and obtains input 

Mits: Return to caller with following return codes: 

- successful operation 
8 - unsuccessful completion 
12 - I/O error See operations tables for csect of IKJEBESA. 

S§Hi§ t er_Usa £e : 

Entry 

• All registers except 13 are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

• Register 13 contains the address of a save area. See operations 
tables for csect of IKJEBESA. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. See operations tables for csect 
of IKJEBESA. 
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IKJEBESA (CSECT OF IKJEBESA) 

Mo d u 1 e_Naie •* IKJEBESA 

Co m mo n _Na m e : SAVE subcommand processor, main line routine. 

Entry: Via LINK from module IKJEBEMA or IKJEBEEN at entry point 
IKJEBESA. 

Attributes: Re-entrant and refreshable. 

O£££ation: Causes the utility data set to be saved as the permanent 
data set with the name specified on the SAVE subcommand or with the name 
specified on the Edit command. 

J5i*t.§_ Areas_Def ined_bj_this_Module : 

CABFRPL - (in IKJEBECA) 

CASCWKA - (in IKJEBECA) 

CATEMPBF - (in IKJEBECA) 

CASVAREA - (in IKJEBECA) 

Data Areas Updated by this Module: 

CAATTNIS- CADSNOFF- CAEDDDN- CANXTSVA- CASAALOC- 

CADSMODS- CADSN0F2- CAEDDISP- CAPRSPDL- CASADSN- 

CADSNPTR- CADSNRC2- CAEDMEM- CAPTIBFR- CASADISP- 

CADSNPT2- CAEDDSOR- CAEDMEMB- CAPTPRSD- CASADDN- 

CADSNLN2- CAEDALOC- CAEDUNCG- CASRPLST- CASADSNL- 

CASADSOR- CASAFNCP- CASAMEM- CASAMEMB- CASAPSWD- 
CASAUNCG- (in IKJEBECA) 

22 u £ jji es_oj:_Module s_Call ed : 

IKJEBEMS - Message select routine 

IKJDFLT - Default service routine 

IKJPTGT - Putget service routine 

IKJDAIR - Dynamic allocation interface service routine 

IKJEBEFC - Final copy routine 

IKJPARS - Validates SAVE subcommand operands 

IKJEBSA9 - SAVE message processing routine 

I^iis: Return to caller with the following return codes: 

- successful operation 
12 - I/O error in utility data set 

2§3ist er_Us a cje : 

Entry: 

• All registers are saved. 

• Register 1 contains the address of IKJEBECA. 

Exit: 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBESC 

M o a u 1 e _ N a m e : IKJEBESC 

C g m mon_Na me : SCAN subcommand processor. 

Entry: 

Via LINK from module IKJEBEMA at entry point IKJEBESC. 
Via LINK from module IKJEBEEN at entry point IKJEBESC. 

Attributes: Refreshable, read-only , non-privileged , enabled. 

Operation: Loads and deletes syntax checker; performs initial copy 
processing for syntax checker. 

Data_Areas_Def ine d_bx_t his_Mo d ul e : 

CABFRPL - (in IKJEBECA) 
CASCWKA - (in IKJEBECA) 
CASVAREA - (in IKJEBECA) 

Data Areas. Updated by this Module: 

CAPROMPT- CASYNAME- CASYNPWA- 

CAPTCHK- CASYNBFR- CASRPLST- 

CASCANON- CASYNMS1- CANXTSVA- 

CASCANSW- CASYNMS2- (all in IKJEBECA) 

CASCRC20- CASYNPTO- 

The_f o 1 low ing._Cse c t s__a r e__con tain ed_in_t his__lo ad_module : IKJEBESC 

R22iiH£S__or _Mo dul e s_Cal 1 e d : 

IKJPARS - Validates SCAN subcommand operands 

IKJEBEMS - Message output 

IKJEBEUT - Access method interface routine 

IPDSNEXC - Syntax checker 

IKJNC211 - Syntax checker 

PLISCAN - Syntax checker 

PLIFSCAN - Syntax checker 

IKJEBESN - Second load of SCAN subcommand processor 

Exits : 
Normal - 

XCTL to IKJEBESN (second load of SCAN subcommand processor) . 
Error - 

Return to caller with following return code: 
8 - unsuccessful completion 

12 - I/O error in utility data set 

Resist er_Us acje : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

• Register 13 contains the address of a save area. 

Exit 
Normal - 

• Registers 2-12 are restored. 

• Register 1 contains the address of the EDIT Communication Area. 

• Register 15 contains the address of the XCTL parameter list. 
Error - 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBESE 

Module Name : IKJEBESE (Csect name) , link-edited with the load modules 
IKJEBEFI and IKJEBECG. 



I 

Common_Name : String search routine. 



Entry : 

via a BALR instruction from module IKJEBEFI at entry point IKJEBESE. 

via a BALR instruction from module OKJEBECG at entry point IKJEBESE. 

M±£iJ22iiJrS : Reentrant. 

2£^£^ii2H : Searches a given number of lines for a particular string of 
data. 

Data_Areas__Def ine d_bj_t his_Mo d ul e : 

£§:£a^£§§:S_U£dated_b2-_tllis_li24iii§ : 

2.0 H £in_e_s__or _mo d ul e s_Ca 1 1 e d : 

IKJEBEUT - Access method interface routine 

l2Lii§ : Return to caller with following return codes. 

- successful operation ; text found in one line 
4 - successful operation; text found across lines 
8 - text not found 
12 - I/O error in utility data set 

Regist er_Usac[e : 

Entry 

• All registers are saved. 

• Register contains the address of the EDIT Communication Area. 

• Register 1 contains the address of a parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code (in the first byte) and the offset 
to the found text (in the last three bytes) . 
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IKJEBESN 

Module_Name: IKJEBESN 

Common^ Name; SCAN subcommand processor. 

Entry;: Via XCTL from module IKJEBESC at entry point IKJEBESN. 

Attributes: Refreshable, read-only, non-privileged, enabled. 

2E§£§:ti2H : Interfaces with the appropriate syntax checker passing lines 
of input to be syntax checked; causes diagnostic messages to be issued 
when syntax errors are diagnosed. 

Sata_Areas_Defined_bx_this^odule: 

CABFRPL - (in IKJEBECA) 

CASCWKA - (in IKJEBECA) 

CATEMPBF - (in IKJEBECA) 

CASVAREA - (in IKJEBECA) 

Data_Areas_Updated_by_this_Module: 

CACURNUM- 

CALNTOVF- 

CAPTCHK- 

CASYNBFR- 

CASYNPWA- 

CASYNPTO- 

CASYNMS1- 

CASYNMS2- 

CANXTSVA (all in IKJEBECA) 

The following Csects are contained in this.load_mpdule : 

IKJEBESN - Main line routine 

l2U±ine_s_or_Mo dul es_Called : 

IKJEBEMS - Message output 

IKJEBEUT - Access method interface routine 

IPDSNEXC - Syntax checker 

IKJNC211 - Syntax checker 

PLISCAN - Syntax checker 

PLIFSCAN - Syntax checker 

l£J.t:s_ : Return to caller with following return codes. 

- successful operation 
8 - unsuccessful completion 
12 - I/O error in utility data set 

E§£is t er__Usa £e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBETA 

Mocl.uIe_Name : IKJEBETA 

Common, Name; TABSET subcommand processor 

Entry: Via LINK from module IKJEBEMA at entry point IKJEBETA. 

Attributes: Refreshable, read-only, non-privileged, enabled. 

SE^ration: Inserts up to 10 tab settings independent of tab settings 
specified at terminal; controls whether tabs are to be in effect or not. 

Data, Areas, Defined, by_this_.Module: 

CASCWKA - (in IKJEBECA) 
CASVAREA 

Pata„ Areas„ Updated by^t his Module: 

CANXTSVA - (in IKJEBECA) 
CATABS - (in IKJEBECA) 
CASRPLST - (in IKJEBECA) 

The following Csects,, are contained, „,in,this load, module: 

IKJEBETA - Main routine 
IKJEBETAO - Parse PCL Csect 

ftputJ-Pgg- pr_Mpdules ...Called : 

IKJPARS - Validates TABSET subcommand operands. 

IKJGETL - GETLINE service routine; obtains terminal input. 

IKJEBEMS - Message output. 

Ixits: Return to caller with following return codes: 

- successful operation 
| 8 - unsuccessful completion 

S§5lis t er_Usag.e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBETO 

M o d u 1 e _ N a me : IKJEBETO 

Cgmmon_Name : T0P subcommand processor 

Entry: Via LINK from module IKJEBEMA at entry point IKJEBETO. 

Attributes: Refreshable, read-only, non-privileged, enabled. 

Operation: Causes current line pointer to be moved to before the first 
line in the data set or to line number zero. 

I5ata_Areas_pef in e d_bj_t his_Mo du le : 

CASCWKA - (in IKJEBECA) 
CATEMPBF - (in IKJEBECA) 
CASVAREA 

5ata_Areas_Updated_bx_this_Module: 

CALNTOVF - (in IKJEBECA) 
CACURNUM - (in IKJEBECA) 
CANXTSVA - (in IKJEBECA) 

The_followin3_Csects_ar e_contained_in_this_load_module : 

IKJEBETO - Main routine 

22iiiifi6S_or_Mo dules_Called : 

IKJEBEMS - Message output 

IKJEBEUT - Acts as interface to the EDIT Access Method 

Ixii§ : Return to caller with following return codes: 

- successful operation 
12 - I/O error in utility data set 

l§3.ist er_Usac[e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEUI 

Mo£ule_Name: IKJEBEUI 

gQIgon-I^lg* EDIT Access Method initialization routine. 

En t r y '• 

Via LINK from module IKJEBEIN at entry point IKJEBEUI. 

Via LINK from module IKJEBECO at entry point IKJEBEUI. 

Via LINK from module IKJEBERE at entry point IKJEBEIPI. 

Attributes: Refreshable, read-only , non-privileged , enabled. 

0£®£^ii2H : Allocates the resources used by the access method routines; 
loads the access method routines (IKJEBEAA) into storage. 

Data Areas Defined_by_ this Module: 

CATEMPBF - Temporary workarea 

UTILWORK - EDIT Access Method work area 

CASRWKA - Work area 

CASVAREA 

2ata_Areas_Updated_by_this_Module: 

CANXTSVA - (in IKJEBECA) 

CAPTCDCB - (in IKJEBECA) 

CASRPLST - (in IKJEBECA) 

DCBBUFAD - (in UTILWORK) 

DCBDDNAM - (in UTILWORK) 

DCBSYNAD - (in UTILWORK) 

DCBWBKAD - (in UTILWORK) 
UTILDCB - (in UTILWORK) 

The_followin£_Csects_a^ 

IKJEBEUI - Main routine 

Routines or„Moduies_Called : 

IKJDAIR - Allocates utility data set 
IKJEBEMS - Message output 

J!xi±s.: Return to caller with following return codes: 

- successful operation 

4 - unsuccessful operation; insufficient storage 
8 - unsuccessful operation; unable to allocate utility data set 
12 - unsuccessful operation; unable to open utility data set 

R e c[ist er_Usa g;e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except and 15 are restored. 

• Register contains the address of UTILWORK. 

• Register 15 contains a return code. 
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IKJEBEUP 

M £ u le_Na ra e : IKJEBEUP 

C o m mo n_N a m e : UP subcommand processor. 

Entry: Via LINK from module IKJEBEMA at entry point IKJEBEUP. 

Attributes: Refreshable, read-only, non-privileged, enabled. 

OR££ation: Causes current line pointer to be moved toward beginning of 
data set. 

Data Areas^Def ined by_this_Module : 

CASCWKA - (in IKJEBECA) 
CATEMPBF - (in IKJEBECA) 
CASVAREA 

Data Areas, Updated by this... Module: 

CALNTOVF - (in IKJEBECA) 
CACURNUM - (in IKJEBECA) 
CANXTSVA - (in IKJEBECA) 

The_f olio wing_Csects_ar e_ cont a ined_in_this_Load_ Module : 

IKJEBEUP - Main routine 
IKJEBUPO - Parse PCL 

E2 ]i£ia§s_or _Modul e s_Cal 1 e d : 

IKJEBEMS - Message output 

IKJPARS - Validates UP subcommand operands 

IKJEBEUT - Acts as interface to the EDIT Access Method 

Exits: Return to caller with following return codes: 

- successful operation 
8 - unsuccessful completion 
12 - I/O error in utility data set 

S.§3i§t er_Usag;e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEUT 

MofliJle_Name : IKJEBEUT 

Common_Name: EDIT Access Method interface routine. 

Intr^: Via BALR from modules IKJEBEBO / IKJEBECG, IKJEBECH, IKJEBECN, 

IKJEBECO, IKJEBEDE / IKJEBEDO / IK JEBEFC , IKJEBEFI, IKJEBEFO, IKJEBEIM, 

IKJEBEIP, IKJEBEIS, IKJEBELI, IKJEBELT, IKJEBEME, IKJEBEMR, IKJEBERE, 

IKJEBERU, IKJEBESC, IKJEBESN / IK JEBETO , and IKJEBEUP. 

Attributes: Refreshable, read-only, non-privileged, enabled. 

Operation: Selects proper operation routine (read, write, or delete) 
based on function desired by caller. 

£sLti*-Jk££3.s__i)ef i ne d_by_ t hi s_Mo d ul e : 

TEMPAREA - (in UTILWORK) 

Data^Areas^Updated,, by^ this Module: 

CADSMODS - (in IKJEBECA) 
CANXTSVA - (in IKJEBECA) 
CAUTILNO - (in IKJEBECA) 
DABUFNO - (in UTILWORK) 
DCBSTATS - (in UTILWORK) 
VTABLE - (in UTILWORK) 

■TJLg^fpllggiR.g £sects are , contained_in_ this load, module : 

IKJEBEUT - Main routine 

^2iitines__or_Mo dul es_Called : 

IKJEBEMS - Message output 
IKJEBERR - Read operation routine 
IKJEBEWR - Write operation routine 
IKJEBEDR - Delete operation routine 

I^iis: Return to caller with following return codes: 

- successful operation 

4 - unsuccessful read or delete operation; record not found 
8 - I/O error 
12 - invalid line number 

E§3is t e r_Us a .ge : 

Entry 

• All registers are saved. 

• Register contains the address of the EDIT Communication Area. 

• Register 1 contains the address of a three-word parameter list. 

Exit 

• All registers except 1 and 15 are restored. 

• Register 15 contains a return code. 

• Register 1 contains address of record for read operation. 
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IKJEEEVE 

Mo£__e__ame : IKJEBEVE 

Com_on__ame: VERIFY subcommand processor 

Entry: LINK from module IKJEBEMA at entry point IKJEBEVE, 

l__ributes: Refreshable, read-only , non-privileged , enabled. 

2Eiz£___2Il : Sets the verify switch in the EDIT Communication area 
depending on the subcommand operand entered. 

!Jat^-J.£e§-§-^£gJ.ill6^-fel-.„tfeJ:§-M25.^^§- : 

CASCWKA - (in IKJEBECA) 
CASVAREA 

2ai^_l£e^s_U£dated_by_this_Module: 

CASRPLST - (in IKJEBECA) 

CAVRFYSW - (in IKJEBECA) 

CAFREEDL - (in IKJEBECA) 

CANXTSVA - (in IKJEBECA) 

The_following._Csects_are_conta.ined 

IKJEBEVE - Mainline routine 
IKJEBVEP - PCL for IKJPARS 

l2Iiiines_or__o_ules_Called : 

IKJEBEMS - Message output 

IKJPARS - Validates VERIFY subcommand operands 

H_i_s_ : Return to caller with following return code: 

- successful operation 
8 - unsuccessful completion 

______________ : 

Entry 

• All registers are saved. 

• Register 1 contains the address of the EDIT Communication Area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEWA (CSECT OF IKJEBEAA) 

Csect_Name: IKJEBEWA 

Co m mon _Na m e : Wait routine 

Sntrj^: 

Branch from csect IKJEBEAD at entry point IKJEBEWA. 

Branch from csect IKJEBEAS at entry point IKJEBEWA. 

Branch from csect IKJEBERB at entry point IKJEBEWA. 

Branch from csect IKJEBEWB at entry point IKJEBEWA. 

0£®JL§£ion: Waits on completion of an I/O operation ina particular 
buffer . 

2§:ta_Areas_Def ined_by_this_Csect : 

2^£§._4£§^s_U£dated_by_this_Csect : 

TEMPAREA (in UTILWORK) 
BUFSTATS (in buffer) 
BUFTTR (in buffer) 
DCBSTATS (in UTILWORK) 

S2^£in£S__or_ Mo dul es__Cal le d : 

WAIT 

CHECK 

MOTE 

SYNADAF 

SYNADRLS 

J«x.Lis_: Return to caller with following return codes: 

- successful operation 
12 - I/O error 

Eecjis t e r_Us age : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEWB (CSECT OF IKJEBEAA) 
C s e c t_ N a m e : IKJEBEWB 
Common_Name: Write block routine 

Ia££X : 

Branch from csect IKJEBEAD at entry point IKJEBEWB, 

Branch from IKJEBEAS at entry point IKJEBEWE. 

Branch from IKJEB.EDL at entry point IKJEBEWB. 

Branch from IKJEBEDU at entry point IKJEBEWB. 

Branch from IKJEBEWR at entry point IKJEBEWB. 

Attributes : 

2E££§Jii2£ : Writes a particular block into the utility data set. 

Data , Areas, Defined by this Csect: 

2^£§L_ii:6§;S_U£dated_bx_this_Csect : 

DCBBUFIO (in UTILWORK) 
DCBSTATS (in UTILWORK) 
BUFSTATS (in buffer) 

Ro u t in es_or_Module s_Call e d : 

IKJEBEWA - Waits on completion of I/O. 

IECPCNVT - Converts TTR to actual track address 

I^iis: Return to caller with following return codes: 

- successful operation 
12 - I/O error 

R e c[is t er _Usa c[e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a two-word parameter list. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBEWR (CSECT OF IKJEBEAA) 

Csect name: IKJEBEWR 

Co m monjarae : Write operation. 

Intri: from module IKJEBEUT at entry point IKJEBEWR. 

It t r i b u t es : 

Operation: Writes a new record into the utility data set. 

Data Areas Defined by this Csect: 

£§£§^^rg§§^2E5§tQ^^Sl_illi§ llll gg§ct: 

BUFSTATS (in buffer) 
NUMREC (in buffer) 
BUFREF (in buffer) 
DATASTRT (in buffer) 
DCBRECNO (in DTILWORK) 
DCBSTATS (in UTILWORK) 

goM£iSgg-,Q£,.I!!9.^^lQ§_Called : 

IKJEBELO - Locates old record with same key as new record. 

IKJEBEDL - Deletes old record. 

IKJEBEAD - Obtains a new physical block from direct-access device. 

IKJEBEWB - Writes a block into storage. 

IKJEBEMV - Moves records in storage. 

IKJEBEDU - Updates the directory block. 

I^iis: Return to caller with following return codes: 

- successful operation 
12 - I/O error 

E§ £is t er_Usag.e : 

Entry 

• All registers are saved. 

• Register 1 contains the address of a three-word parameter list, 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBMA1 (CSECT OF IKJEBEMA) 

£sect_Name: IKJEBMA1 

Common_Name: Message processing routine for IKJEBEMA. 

Entry: Via BRANCH from module IKJEBEMA at entry point IKJEBMA1. 

Attributes: Refreshable , read-only , non-privileged, enabled. 

Operation: Using an index passed by the caller , this routine selects 
and completes the appropriate insertion and calls the message select 
routine to put the message to the user. 

Data Areas Defined^ by this, Module; 

CATEMPBF - in IKJEBECA 
CASVAREA 

Data_Areas_Updated_by_this Module: 

CANXTSVA - in IKJEBECA 

Thg _, following „Csects. areCon tain ed_in_this_Lo ad Module : N A 

Ro u t i n e s_or _Mo dul e s_Cal 1 e d : 

IKJEBEMS - Message select service routine 

lxi£s: Return to caller with following PUTLINE return codes. 

- successful operation 

4 - attention interrupt 

8 - • NOWAIT 1 specified, function not complete 
12 - invalid parameters 
16 - conditional GETMAIN not satisfied 

Regis t er_U sa c[e : 

Entry 

• All registers are saved. 

• Register 1 contains a pointer to a five word parameter list of the 
following format: 

+0 Pointer to IKJEBECA 
+ 4 Relative first-level message 
+8 Relative second-level message 
+12 Message-dependent information 
+16 Message-dependent information 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBMA2 

C s e c t _ N a m e : IKJEBMA2 

C oja mo n _N a m §_ : Input stack clean-up routine. 

Intrj: Via branch from IKJEBEMA, IKJEBEAE or IKJEBEAT at entry point 

IKJEBMA2. 

attributes: Refreshable, read-only, non-privileged, enabled. 

0£^£^ti2I^ : For entry code (zero) , free current input buffer, if 
necessary, for entry code 1. Clear input and output queues and delete 
the input stack; for entry code 2, delete the input stack, 

£ata_Areas__Def ine d_by_ t hi s_Mo d ul e : 

CASVAREA - 18 word save area in IKJEBECA 

CANXTSVA - (in IKJEBECA) 

CAOPERND - (in IKJEBECA) 

CAPTGTBF - (in IKJEBECA) 

CASRPLST - (in IKJEBECA) 

The_Followin£_Csects_ar e_Containe : NA 

l2Mt in es_or_Mo dul e s_Ca 1 le d : 

IKJSTCK - STACK service routine 

Exits: Return to caller with following return codes. 

- successful operation 
4 - unsuccessful operation 

E^i s t e r _Us ag.e : 

Entry 

• All registers are saved. 

• Register 1 contains a pointer to a work area. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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IKJEBMA8 

Csect_Name: IKJEBMA8 

Co m mon_Name : IBM-supplied table of subcommands. 

I Entry : NA 

l£i£ibutes: Refreshable, read-only, non-privileged, enabled. 

OEeration: Table of IBM-supplied subcommands. (See Section 5: Data 
Areas for Description of Table Format.) 

D a t a_ A r e a s_ D e f i n e d _ bx_ t h i s_M o d u 1 e : None 

2 a t a _ A r e a s_U £d a t e d _b^_ t h i s_Mo d u 1 e : None 

T h§_Fo 1 low i ng,_Cse c t s_a r e_Con tain ed_i n_ t h is_Lo a d_Mo du 1 e : N A 

S.°.MtiH^s_or _Mo d ul e s_Ca 1 1 e d : N A 

I Exits : NA 

Register Usage : 

Entry 
NA 

Exit 
NA 
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IKJEBMA9 

Csect_Name: IKJEBMA9 

Co llon_Name : User-supplied table of subcommands. 
I Entry : NA 

Attributes: Refreshable, read-only, non-privileged, enabled. 

0E§£§.ti2H 2 Table of user-supplied subcommands. (See Section 5: Data 
Areas for Description of Table Format. 

P§tj§_JEggg^ Define d n by this Module : None 

2 a t a_ A r e as_ Up d a t e d__ bx__ t h i s_M o d u 1 e : None 

Th e_Fo llo wi n cj_Cse c t s__a r e_Con t a ined_i n_ t hi s__Lo a d_ Mod ule : N A 

£ou£i]ies_or_Mo dules_Calle d : NA 

I Exits : NA 

Register Usage : 

Entry 
NA 

Exit 
NA 
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IKJEBSA9 

Csect__Name: IKJEBSA9 

Com mon__N ame : SAVE message processing routine. 

Entry: Via BRANCH from module IKJEBESA at entry point IKJEBSA9. 

lii£i^Mi^s: Refreshable, read-only , non-privileged, enabled. 

Operation: Prepares message insertions and selects error message to be 
put to the user by the message select routine. 

Data_Areas_Def ined_by_this_.Module: 

CABFRPL - in IKJEBECA 
CASVAREA 

Data Are as,. Up dated by this Module: 

CADSNPT2 

The_Following_Csects_are Contained ,_in_this_Lqad Module : N A 

l2!liill£s_2£_Mo dul es_Called : 

IKJEBEMS - Message selection routine 

limits: Return to caller with following Putline return codes. 



4 

8 

12 

S§2is t er_Usag.e : 

Entry 

• All registers are saved. 

• Register 1 contains a relative error number. 

Exit 

• All registers except 15 are restored. 

• Register 15 contains a return code. 
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Chart AC. IKJEBEAS 
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Chart AE. IKJEBEBO 
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Chart AG. IKJEBECG 
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Chart AI. IKJEBECG 
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CI 






Set Bits to 
Indicate 








Diagno 
Incomp 
Statem 


se 

lete 
ent 













>^Was ^H 






/ Last Return \> Yes 




X. Code 12 y 




|No 






Y GT 








Initialize Buffer 








and Buffer 








Pointer 






CHK 


RCALL 


HI 






>~ 


LANGPRCR 




P* 




h/ 


Entry 








/ trror X. ^j 

Msg Sent By\jesO\ 
Syntax Checker •? *\^S 



C3 



Convert Relative 
Position in Buffer 
to Relative 
Position in Range 



V D3 
2nd Lev 
Msg to Be \ N ° 

Sent 



F3 



Convert Relative 
Position in Buffer 
to Relative 
Position in Range 



J3 



Set Bit to Indicate 
Diagnose 
Incomplete 
Statement 



Reset 2nd Level 
Msg Pointer 
to 



Err 
Msg Sent By 

Syntax 



Records 
Line Numbered 



Convert Relative 
Position in Buffer 
to Relative 
Position in Range 



Msg to Be 
Sent 



Records ^S^Yes 
Line Numbered 



Convert Relative 
Position in Buffer 
to Relative 
Position in Range 
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Chart EL. 



IKJEBESN 



&■ 




Set Bits to 
Request Diagnose 
Incomplete 

Statement 



Increment Total 
No. Lines Sent 
by No. Lines in 
Buffer 



W 
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Chart EM, 



IKJEBESN 




Reset Return 
Code to 16 



Reset ' * 
Value 



Reset 2nd Level 
Msg Pointer 
to 



Free List of 
Buffers 




Turn Off RC 12 
Switch 

Reinitialize Buffer 
Pointers, Set No. 
of Records to 0. 




Turn On 
1 Line to be 
Verified ' 
Switch 



( Return j 



<P 
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Chart EN. IKJEBESN 



( En "y j 







CI 




Move Buffer 
Pointer to 




Yes 


Next Bu 
inChai 


tter 






/Set Switch to\ 
/ Indicate 
(Recovery from 
\ Return Code 12/ 



f Return J 



Get a New 
Buffer 



Add New Buffer 
to Chain & ITS 
Address to 
Buffer List 
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Chart EO. IKJEBETA 



IKJEBETA Al 



. Entry J 


LROUT , 


Bl 


Calculate 
Line Size 



© 




Integers to 



(S>— 



Get Line of 
T's 



Integer; 







IKJEBEMS 




.Yes 


IKJ52562I 














1 

ERRLNTH C4 


<-) 






IKJEBEMS 




Yes 


IKJ52556I 


-© 








TC 


I 


/^\ 




)OMTABS 04 


x5) 






IKJEBEMS 




Yes 


IKJ52557I 


*s 








Duplic 



Insert Tab i 
Table 






PLUG 


" 




(7Z) 




G3 


K'y 


Zero Byte 
After Last 
Tab 




OUT , 


« 


H3 


\H3 


f Return to 


^ 




I IKJEF 


tMA 





Any 









>w Li ne ^r 








|Yes 








^h\F5 




(or 


Yes 


^Offset of T X^ 

V >Line y/ 

>v Size yS 

JNo 
>^^v G5 




(t)4 


vYes 


y^ Tab X. 

. Table Full y 

|No 

t H5 


Add Tab to 
Tab Table 









CMD ERRPA ~~1 J5 



E> 



IKJ52313 
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Chart EP. 



IKJEBETO 



f Entry J 


' 


B2 


/ IKJEBEUT / 





Set Return 
Code to 12 




—@ 



Turn 'The Line 
to be Verified 
Switch ' On 



Set Return 
Code to 



( Return J 




Build Line 
Number '0' 
Insertion 



Yes 




Build 


* , 








1 nsertion 




MSG2 i' 


F5 






IKJEBEMS 




IKJ525041 
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Chart EQ. IKJEBEUI 



(Enter IKJEBEUI \- 



Entry 
Linkage 



Obtain Core 
for Workarea 
and Buffers 



IKJEBEMS 



Issue Error 

Message 

IKJ52312I 



Set Return 
Code = 4 




Initialize the 
Workarea and 
Buffer Core to 
Zeros 



Chain the 
Saveareas, 
Move DCB to 
Workarea 



Allocation 

Error 

Messages - 

IKJ52301I 

IKJ52304I 

IKJ52305I 

IKJ52313I 



J52318I 




G2 




IKJEBEMS 






Issue Error 
Message 


No 






1 


■ 


H5 






Perform 
Cleanup, as 
Required 






■ 


1 


J2 






Set Return 
Code = 8 








Move the 
DDNAME into 
the DCB 



OPEN the 
Data Set 




( Return J 
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Chart ER. 



IKJEBEUP 



jcotur Al 

f Entry \- 




Set 'Count ' 
to 1 



Syntax 
Checking of 
Operands 



Read First 
Record of 
Data Set 




ERC3 
ESB4 
ESB4 
ESH3 
ESH2 



<§ 



Set Return 
Code to 12 



RC = 8 




Set Return 
Code to 12 



%> 




Return ^ 
Code from \ RC = 4 
IKJEBEUT= 



' Read Previous 

' Record (Start 

/ith the = 




Decrement 
'Count ' by 1 




Set ' * ' Value 
to Last Line 
Referenced 



Turn 'The Line 
to be Verified 
Switch ' On 



Set Current 
Line Pointer 
to 



r^j 
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Chart ES. IKJEBEUP 






IKJEBEMS 


RC =4 


IKJ52505I 





Set Return 
Code to 



(^ 




■© 



Release 
IKJPARS PDL 
Buffer 



Turn 'Free 
PDL Bit' 
On 



~® 



( Return J 




Set Return 
Code to 4 



■o 



C Return to ^ 
IKJPARS J 



Set Return 
Code to 
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Chart ET. 



IKJEBEUT 



(Enter IKJEBEUT J 







IKJEBEDR 



Perform 
Delete 
Operation 



-© 




Give Error 

Message 

IKJ52402I 



Set Return 
Code = 12 



& 



Issue Error 

Message 

1KJ52309I 



Set Return 
Code - 8 



SetUp 
Register 1 for 
Return 



Restore 
Registers 



«•/ Return ] 
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Chart EU. IKJEBEVE 



IK JEBEVE A2 

( Entry J 




Set Verify 
Switch Off 



Set Verify 
Switch On 





/ IKJPARS x 
>v Called y 


. No 








V" ^ 




RELEASE m C4 








Release PDL 




D4/ 




Core 












SETRETCD r D4 






Return 








Code = 








' 


E4 





(Return to A 
IKJEBEMA J 

LOGICERR I F4 
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Chart EV. IKJEBEWA 



IK JEBEWA Al 

(Enter IKJEBEWA J 




Point to XDAP 
Read ECB 



CHECK 



Insure BSAM 

Write 

Complete 




Point to XDAP 
Write ECB 



Set Return 
Code = 




Find TTR 
of Block 



Save Block 
TTR in Buffer 



IKJEBESY EVA4 



Process Error 
Information 



Set Return 
Code - 12 



Restore the 
Registers 



IK JEBESY A4 

(Enter IKJEBESY J 




Point to I OB 
for XDAP Write 



-U Return J 



Find BSAM 
Error Info 



Point to I OB 
for XDAP Read 



Find XDAP 
Error Info 



Save Error 
Information 
in Workarea 



Turn on I/O 
Error Switch 



( Return J 
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Chart EW. IKJEBEWB 



IKJ EBEWB A1 

(Enter IKJEBEWB J 




Write Out 
New Block 
with BSAM 
Write 




IKJEBEWA EVA1 



WAIT for 
Completion 



Convert 
TTR to 
MBBCCHHR 



Write Out 
Block Using 
XDAP Write 




Set Return 
Code = 




Restore the 
Registers 




WB10 v J4 



Leave Return 
Code as is 



*J Return J 



348 EDIT 



TSO Command Processor PLM - Vol. 3 (Eelease 21) 



Chart EX. 



IKJEBEWR 




Tres 




/sn 


WR25 {* 


HI 


\H1 


Leave Return 
Code as is 





f Enter IKJEBEWR J 



Entry 
Linkage 



IKJEBELO CRA2 



IKJEBEDL BBA1 




Delete the 
Old Record 


No 





Set Return 
Code = 



Restore the 
Registers 



[ Return J 
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Chart EY. 



IKJEBEWR 




KJEBEAD AAA! 



Get Buffer for 
New Block 
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Chart EZ, 



IKJEBEWR 




w 




Prepare for 
Block Split 



Move Half 
of. Old Block 
to New Buffer 



Use Work 
Buffer to 
Reorganize 
Old 




IKJEBEWB EWA1 





Lp 



ra 







> 


' 




TNo 
WR10 } K3 






WR110 


K4 


Clear 

SECONKEY, 
Old Block 
Complete 






Identify 
Buffer for 
Correct 
Operations 










• 


' 
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Chart FA. 



IKJEBEWR 



SECONKEY = 
KEY/TTR of 
Last Record 



WR100 A4 



( Enter WR 100 J 



IKJEBEMV DDA3 



Move In the 
New Record 



IKJEBEDU BKA2 



Increment 
Record Count 
Update Switch 
On 



Dl 



Place the Record 
Position Indicator 
in the Correct 
Position 




( Return j 




Set Up Directory 
Entry as DSDB 



Update Entry 
for New Block 




Update 

Directory Entry 
for Old Block 




w 
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IKJEBEAA 



IKJEEEAA 



Control Section 



MO Flow 
Entrx_Point Diagram Chart 



IKJEBEBO 
IKJEBECG 

IKJEBECH 



IKJEBECI 



IKJEBECN 
IKJEBECO 
IKJEBEDA 

IKJEBEDE 

IKJEBEDO 

IKJEBEEN 



IKJEBEEX 
IKJEBEFC 
IKJEBEFI 



IKJEBEFO 

IKJEBEHE 
IKJEBEIM 



IKJEBEBO 
IKJEBECG 
IKJEBESE 
IKJEBECH 



IKJEBECI 



IKJEBECN 
IKJEBECO 
IKJEBEDA 

IKJEEEDE 

IKJEBEDO 

IKJEBEEN 



IKJEBEEX 
IKJEBEFC 
IKJEBEFI 



IKJEBESE 
IKJEBEFO 

IKJEBEHE 
IKJEBEIM 



IKJEBEAD 
IKJEBEAS 
IKJEBEDL 
IKJEBEDR 
IKJEBEDS 
IKJEBEDU 
IKJEBELO 
IKJEBEMV 
IKJEBERB 
IKJEBERR 
IKJEBEWA 
IKJEBEWB 
IKJEBEWR 
IKJEBEBO 
IKJEBECG 
IKJEBESE 
IKJEBECH 
IKJEBCH1 
IKJEBCH2 
IKJEBCH3 
IKJEBCH4 
IKJEBECI 



IKJEBCIM 
IKJEBECN 
IKJEBECO 
IKJEBEDA 
IKJEBDAM 
IKJEBEDE 
IKJEBDE1 
IKJEBEDO 
IKJEBDOO 
IKJEBEEN 

IKJEBENO 
IKJEBEEX 
IKJEBEFC 
IKJEBEFI 
IKJEBFIO 
IKJEBFI1 
IKJEBESE 
IKJEBEFO 
IKJEBFOO 
IKJEBEHE 
IKJEBEIM 



IKJEBEAD 


33 


AA 


IKJEBEAS 


36 


AC 


IKJEBEDL 


32 


BB-ED 


IKJEBEDR 


30 


BG 


IKJEBEDS 


37 


BH-BJ 


IKJEBEDU 


34 


BK-BO 


IKJEBELO 


31 


CR,CS 


IKJEBEMV 


-- 


DD 


IKJEBERB 


38 


DI 


IKJEBERR 


29 


DO 


IKJEBEWA 


39 


EV 


IKJEBEWB 


35 


EW 


IKJEBEWR 


28 


EX-FA 


IKJEBEBO 


5 


AE 


IKJEBECG 


6 


AF-AK 


IKJEBESE 


-- 


EH 


IKJEBECH 


5 


AL-AN 



IKJEBECI 


-- 


AO,AP 


STAEEXIT 


-- 


— 


STAIEXIT 


-- 


— 


STAERTRY 


— 


— 


IKJEBECN 


5 


AQ-AT 


IKJEBECO 


-- 


AU-AW 


IKJEBEDA 


— 


AX 


IKJEBEDE 


7 


AY-EA 


IKJEBEDO 


8 


BE # BF 


IKJEBDOO 


-- 


— 


IKJEBEEN 


-- 


BP 


IKJEBEXT 


— 


-- 


IKJEBEEX 


26 


BQ 


IKJEBEFC 


— 


BR.BS 


IKJEBEFI 


9 


BT 


IKJEBESE 


_ _ 


EH 


IKJEBEFO 


10 


BU,BV 


IKJEBEHE 


11 


BW 


IKJEBEIM 


12 


BX-CB 
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Load_Module A ssemblx_ Module Control., Section 



MO Flow 
JUliEX_£pJLll£ Diagram Chart 



IKJEBEIN** 


IKJEEEIN 


IKJEBEIN 


IKJEBEIN 


1 


CC-CJ 






IKJEBIN1 


IKJEBIN1 


-- 


— 






IKJEBIN2 


IKJEBIN2 


— 


— 






IKJEBIN3 


IKJEBIN3 


— 


— 






IKJEBIN4 


IKJEBIN4 


-- 


— 






IKJEBIN5 


IKJEBIN5 


-- 


— 






IKJEBIN6 


IKJEBIN6 


-- 


— 






IKJEBIN7 


IKJEBIN7 


— 


— 






IKJEBIN8 


IKJEBIN8 


— 


— 


IKJEBEIP 


IKJEBEIP 


IKJEBEIP 


IKJEBEIP 


-- 


CK,CL 






IKJEBXT1 


IKJEBXT1 


— 


— 






IKJEBIP1 








IKJEBEIS 


IKJEBEIS 


IKJEBEIS 
IKJEBIS1 


IKJEBEIS 


13 


CM,CN 


IKJEBELE 


IKJEEELE 


IKJEBELE 


IKJEBELE 


-- 


CO 


IKJEBELI 


IKJEBELI 


IKJEBELI 
IKJEBLI1 


IKJEBELI 


14 


CP,CQ 


IKJEBELT 


IKJEBELT 


IKJEBELT 
IKJEBLT1 


IKJEBELT 


15 


CT-CV 


IKJEBEMA 


IKJEBEMA 


IKJEBEMA 


IKJEBEMA 


2 


CW-CY 








MAAERTRY 


-- 








IKJEBMA1 


IKJEBMA1 


— 


— 






IKJEBMA2 


IKJEBMA2 


— 


— 






IKJEBMA8 










IKJEBMA9*2 


IKJEBMA9 










IKJEBEAE 


IKJEBEAE 


IKJEBEAE 


„ 


AB 




IKJEBEAT 


IKJEBEAT 


IKJEBEAT 


4 


AD 




IKJEBEUT 


IKJEBEUT 


IKJEBEUT 


27 


ET 


IKJEBEME 


IKJEBEME 


IKJEBEME 
IKJEBMEN 
IKJEBMEO 


IKJEBEME 


16 


CZ,DA 


IKJEBEMR 


IKJEBEMR 


IKJEBEMR 
IKJEBMRM 


IKJEBEMR 


— — 


DB 


IKJEBEMS 


IKJEBEMS 


IKJEBEMS 


IKJEBEMS 


-- 


DC 


IKJEBEM1 


IKJEBEM1 


IKJEBEM1 








IKJEBEM2 


IKJEBEM2 


IKJEBEM2 








IKJEBEM3 


IKJEBEM3 


IKJEBEM3 








IKJEBEM4 


IKJEBEM4 


IKJEBEM4 








IKJEBEM5 


IKJEBEM5 


IKJEBEM5 








IKJEBEM6 


IKJEBEM6 


IKJEBEM6 








IKJEBEM7 


IKJEBEM7 


IKJEBEM7 








IKJEBEPS 


IKJEBEPS 


IKJEBEPS 


IKJEBEPS 


-- 


DH 






IKJEBEPD 


IKJEBEPD 


-- 


— 


IKJEBERE 


IKJEBERE 


IKJEBERE 


IKJEBERE 


18 


DJ-DM 






IKJEBRE4 


IKJEBRE4 


-- 


— 


IKJEBERN 


IKJEBERN 


IKJEBERN 


IKJEBERN 


-- 


DN 



| ** EDIT and E are aliases for the load module IKJEBEIN. 

* 2 The user has the option to assemble the EDIT program with IKJEBMA9 as 
an assembly module. 
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L2£iLJ5°£ul§ 
IKJEBERU 
IKJEBESA 

IKJEBESC 

IKJEBESN 
IKJEBETA 

IKJEBETO 
IKJEBEUI 
IKJEBEUP 

IKJEBEUT 
IKJEBEVE 



Assembly Module 
IKJEBERU 
IKJEBESA 

IKJEBESC 

IKJEBESN 
IKJEBETA 

IKJEBETO 
IKJEBEUI 
IKJEBEUP 

IKJEBEUT 
IKJEBEVE 



Control Section 



MO Flow 
IHi£Z_Eoint Digram Chart 



IKJEBERU 
IKJEBRUO 
IKJEBESA 
IKJEBSA1 
IKJEBSA2 
IKJEBSA8 
IKJEBSA9 
IKJEBESC 
IKJEBSCI 
IKJEBESN 
IKJEBETA 
IKJEBTAO 
IKJEBETO 
IKJEBEUI 
IKJEBEUP 
IKJEBUPO 
IKJEBEUT 
IKJEBEVE 
IKJEBVEP 



IKJEBERU 


19 


DP,DQ 


IKJEBESA 


20 


X DR-EB 


IKJEBSA1 


— 


— 


IKJEBSA2 


— 


— 


IKJEBSA8 


-- 


— 


IKJEBSA9 


-- 


— 


IKJEBESC 


21 


EC-EG 


IKJEBESN 


21 


EI-EN 


IKJEBETA 


22 


EO 


IKJEBETO 


23 


EP 


IKJEBEUI 


26 


EQ 


IKJEBEUP 


24 


ER,ES 


IKJEBEUT 


27 


ET 


IKJEBEVE 


25 


EU 
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Section 5: Data Areas 



This section describes the formats of: 

• The data areas and control blocks built and used by the EDIT 
program. 

• The parameters lists passed to the EDIT program. 

• The parameters lists that the EDIT program passes to the various TSO 
service routines and to the syntax checkers. 

EDIT Communication Area (IKJEBECA) 

The EDIT Communication Area is built by the EDIT initialization routine 
(IKJEBEIN) . It is used by all of the modules of the EDIT program except 
for the Access Method service routines (IKJEBEAA) . Fields marked with 
superscripts are described in more detail following the description of 
the EDIT Communication Area. 



Disp 
dec 



Disp 
hex 



Field 
Name 



| Size 
| Bytes 



-f- 



Contents 



|CAPTTMP 



Addr . of TMP Parameter List 



-4 



j. 

8 

I- 

12 

I- 

16 



4 I 



I 
-+- 



Reserved storage 



8 JCAPTAE 
C ICAPTAT 



I 4 

-+ 

I 4 



Addr, 



of IKJEBEAE 









Addr. of IKJEBEAT 



10 ICAPTLE 



I 



Addr, 



of IKJEBELE 



20 



14 JCAPTMS 



Addr. of IKJEBEMS 



24 



18 |CAPTUT 



Addr, 



of IKJEBEUT 



28 



1C ICAPTMSGM 



Addr. of IN-CORE message module 



32 



20 |CAPTRTRY 



Addr. of STAE re-entry routine 



36 



24 |CAPRSPDL*i 



I 



IKJPARS PDL flag byte 



36 



24 |CAPTPRSD 



+ 

28 |CASCBFFL* 2 



Addr. of IKJPARS PDL 



40 



Subcommand buffer flags 



40 



28 JCAPTIBFR 



-+- 



Addr. of subcommand input buffer 



44 



2C jCAPTSCMD 



Addr. of subcommand last entered 



48 



30 ICASCMDLN 



Length of subcommand name 



50 



32 | 



Reserved storage 



52 



34 |CAPTCDCB 



Addr. of current utility work 
area (UTILWORK) 
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Disp 
dec 
j. 

56 



| Disp 

| hex 

4 

I 38 
I 



Field 
Name 

CAPTPDCE 



T T ■ 1 

Size | 

Bytes | Contents 

4 |Addr. of new utility work area 
| (UTILWORK) 

H 



60 



j. 



6a 



3C 



40 



CAUTILNO 
CAPTCORE 



4 | Number of records in utility data 
| set 






4 |Addr. of GETMAIN area 



68 | 44 



CACORELN 



4 | Length of GETMAIN area 



12 | 48 

I 



CAPTCHK 



4 jAddr. of syntax checker or 
| language processor 



-+ 

j 4C 

•+ 

| 78 



76 

I 

120 



CAATTN*3 



44 | Reserved storage 
4 | Attention ECB 



-H 



124 



I 7C 



CACFLAG 



| Control flags 



-+- 



124 | 7C 



CACFLAG1** 



Control flag #1 



+ 
| Control flag #2 



125 



I 7D 
4- 



CACFLAG2* 5 



126 | 7E 



CACFLAG3** 



| Control flag #3 



127 



| 7F 



CACFLAG4*? 



| Control flag #4 

+ 



H 



128 | 80 



CACFLAG5 



| Control flag #5 Bits 0-7 reserved 



129 



130 
j. 

131 
j 

132 



n 



CACFLAG6*s 



82 



| 83 
4 

I 84 



4 



| Control flag #6 



CAPLILFM 
CAPLIRTM 

4 






| PLI Left source margin 



| PLI right source margin 

20 j Reserved storage 
f- 



152 | 98 



CADSTYPE 



8 | Data set type keyword 



160 



AO 



CADSQUAL 



| Data set name gualifier 



168 

Y 

170 

171 
h 



A8 



CABLKS 



2 | Default block size 



AA 
AB 



CALINE 
CALENGTH 



1 jLine number offset 



172 



AC 



1 | Line number length 
-+- 



CATABS 



12 jTabsetting values 



184 | B8 



CASYNAME 



f- 



8 | Syntax checker name 



192 



CO 



193 | C1 



CADSCODE** j 1 | Data set type code 

CADSATTR*io | 1 | Data set attributes, Byte 1 

— 4 



194 



| C2 



CADSATR2*!* 



1 | Data set attributes, Byte 2 



195 
196 



I C3 



CARECFMD 



1 I Record format default 



f _, 

2 |F format lrecl default 
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| C4 

.j 



CAFLRLDF 
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I Disp 
dec 



198 



h-- 



Disp 
hex 



C6 



Field 
Name 



CAFLRLMX 



Size 
Bytes 



Contents 



F format lrecl maximum 



200 
202 
204 
206 



C8 



f- 



CAVLRLDF 



V format lrecl default 



CA 



CAVI*RLMX 



V format lrecl maximum 



CC 



CAULRLDF 



U format lrecl default 



CE 



CAULRLMX 



U format lrecl maximum 



H- 



208 



DO 



CACHKOPT 



Syntax checker option word, 
Bytes and 1 



210 
218 
226 
232 
234 
236 
237 
238 
240 
284 
292 
300 
308 
312 
316 
318 

320 
376 
377 
378 
380 



D2 



CAPRNAME 



Prompter name 



DA 



CAEXTNAM 



User exit name 



E2 



Reserved storage 



E8 



CALRECL 



Data length plus control word 
.| 

Reserved storage 

Control flag for EDIT data set 

1 



h 4 



EA 
EC 



CAEDFLAG*i3 






ED 



Reserved storage 



EE 



CAEDDSNL 



Length of DSNAME 






F0 
+ 

11C 



CAEDDSN 



44 



Dsname of EDIT data set 



-+ 



CAEDMEMB 



4. 



124 



12C 



CAEDDDN 
CAEDPSWD 






Member name for EDIT data set 
^ 

DDname for EDIT data set 

Password for EDIT data set 

H 



134 



CAEDTSIZ 



138 



CADSNPTR 



Size of old EDIT data set 
Pointer to next insertion record 



13C 



CADSNLEN 



Length of next insertion record 



13E 

+ 

140 



CADSNOFF 
CADSNREC 



+ 

56 



Offset in message to next 
insertion record 



EDIT data set name insertion 



178 
+ 

179 



CASAFLAG*** 



Control flag for SAVE data set 



-+■ 



Reserved storage 



17A 



CASADSNL 



Length of SAVE dsname 



17C 



CASADSN 



44 | Dsname of SAVE data set 
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T T 

Size | 

Bytes| Contents 



Disp 
dec 



Disp 
hex 



Field 
Name 



424 
V 

432 
h 

440 



1A8 

4~— - 

1B0 
1B8 



CASAMEMB 

CASADDN 

CASAPSWD 



8 J Member name for SAVE data set 
8 |DDname for SAVE data set 
8 | Password for SAVE data set 



448 

452 
f 



1C0 
4 

1C4 



CASTNUM 
CANXTREC 



4 | Starting line number 



1 



4 | Next record key for input mode ^ 



456 


- + - 
1 


1C8 


460 


1 
1 


1CC 


464 


T 
| 


1D0 


468 


1 
| 


1D4 


472 


1 
1 


1D8 


476 


1 
| 


1DC 


4 80 


1 
- + - 


1E0 



CACURNUM 



4 | Current line number, '*' 



CAINCRE 



4 | Line number increment 



1 



CAIMLLNO 



(Last line number used in input -| 
| mode 

H 



CAIMLINC 



4 | Last increment used in input mode 



4 | Reserved storage 



H 



+ 



CAINSAVE 



| Last line number in Input mode ^ 
| when INSERT was used 



16 | Reserved storage 



H 



496 
I- 

496 



1F0 
+ 

1F0 



CASYNLST 



| Syntax checker parameter list 



CASYNBFR 



JAddr. of first buffer in chain 
f 



500 
504 
508 
509 
512 
516 

h 

520 
h 

524 
I- 

525 

526 



1F4 



CASYNPWA 



|Addr. of work area 



1F8 



CASYNPTO 



4 JAddr. of option word 



1FC 
+ 

1FD 



CASYNECD 



1 | Syntax checker entry code 



CASYNWAP 



3 JAddr. of checker work area 



200 



CASYNES1 



--+ 



|Addr. of first error message -| 



204 

f 

208 



CASYNMS2 



~f 



20C 



CASYNTEM 
CASYNCD1 






j Addr . of record and chained 
I messages 

j Temporary storage for checker 

j Option word code #1 



20D 



CASYNCD2 



1 | Option word code #2 



-\ 



20E 



CASYNRCL 



— f- 



1 | Record length for fixed record H 
| length only. For variable record 
{length value of this field is ^ 
| zero 

+ -i 



I 527 | 20F |CASYNSW*is 

L L X 



I 1 

-J 



I Bit switches 

_j 
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1 T 

Size 
Bytes 



|Disp 
| dec 






528 
532 
536 
540 



556 

576 

596 

628 

728 

928 

928 

932 

936 

938 

940 

952 

1064 

1188 

1448 

1784 

2312 

2840 
3560 



3564 
3584 
3588 



Disp | 
hex I 



Field 
Name 



210 ICAPTUPT 
-+- 



214 (CAPTECT 



218 I CAPTECB 
+ 



21C |CASRPLST 



22C |CASTAXPL 
-+- 



240 ICASTAEPL 
-4- 



254 |CAMAWKA 



274 JCAMSWKA 
-+- 



2D8 |CASRWKA 



3A0 |CAMODEMG 
+ 



3A0 |CAMODEIS 



3A4 |CAMODEPT 
+ 

3A8 ICAMODELN 
+ 



3AA |CAMODEOF 
-+- 



3AC |CAMODETX 
-+- 



CB8 |CAATNWKA 

428 I 

+ 



4A4 ICAFIBFR 

5A8 ICASCWKA 

6F8 ICABFRPL 

908 ICATEMPBF 



B18 |CASVAREA 
f 



DE8 ICANXTSVA 
I 

DEC | 
+- 



E00 |CADSNPT2 
-f- 



E04 |CADSNLN2 
I 



3590 | E06 |CADSNOF2 

I 3592 | E08 | CADSNRC2 
I i I 

L J J 



16 



20 



20 



32 



100 



200 



f- 



12 



112 

+ 

124 



260 

+ 

336 



528 

+ 

528 



+ 

720 



20 



2 

+ 

56 



Contents 



Add. of UPT 



Addr. of ECT 



Addr. of EDIT ATTENTION ECB 






TMP Service Routine parameter 
list 



STAX parameter list 



STAE parameter list 



Main controller work area 



Message selection work area 



Service routine work area 



Insertion record for command name 



H 



Number of insertions 



Address of insertion text 



Length of insertion record 



Offset in msg for insertion 



Insertion text 
., 

Attention exit work area 

Reserved 

1 

FIND buffer 
Subcommand work area 



-I 



Buffer pool 

Temporary buffer pool available 
to all EDIT subcommands and 
service routines 

Chained save areas 



Addr. of next save area to be 
used 



Reserved 



-H 



Pointer to next insertion record 



Length of this next insertion 
record, including header 



H 



Offset # in message, to insertion 

SAVE data set name message 
insertion 
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CAPRSPDL** 

The following table indicates the values against which CAPRSPDL is 
compared. 

CAPRSPDL is the IKJPARS PDL byte. Note: Bits 1-7 are reserved. 

i t r ' t T 

I Symbolic Name | Size | Value | Setting of Bit - Meaning | 

j. + + + _, 

| CAFREEDL | 1 | 80 hex |0 - PDL requires FREEMAIN | 

I I Bit | | 1 - PDL does not exist | 

L 1 X X , J 



CASCBFFL** 

The following table indicates the values against which CASCEFFL is 
compared . 

CASCBFFL contains the subcommand buffer flags. Note: Bits 1-7 are 
reserved . 

i 1 r 1 1 

| Symbolic Name| Size | Value | Setting of Bit - Meaning I 

I x + -j H 

| CAOPERND | 1 | 80 hex |0 - subcommand operands do not exist | 
| | Bit | | 1 - subcommand operands do exist | 

L L L _J J 



CAATTN*3 

The following table indicates the values against which CAATTN is 
compared. 

CAATTN is the ATTENTION ECB. Note: Bit and bits 2-7 are reserved. 

j r r 1 1 

ISymbolic Name| Size | Value |Setting of Bit 1 - Meaning I 

j. x + 4 H 

| CAATTNIS | 1 | 40 hex | 1 - attention not issued I 

J | Bit | [0 - attention issued I 

i j i i j 
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CACFLAG1** 

The following table indicates the values against which CACFLAG1 is 
compared. 

CACFLAG1 is control flag #1. 



r r r r 

ISymbolic Name) Size j Value | 



Meaning 



1 


CALNTOVF 
CAVRFYSW 


— +— 

1 

1 

1 
„ + — 

1 
1 
1 


1 

Bit 

1 
Bit 


-+- 


80 
40 


hex 

hex 


_+ 

(Line to be verified? 
| 1 - Yes 
| - No 

IVerify switch 
I 1 - On 
|0 - Off 

4. 


j 


J 

J 


CAPROMPT 
CASCANSW 


T 
1 
1 
1 

1 

1 

1 
4. 


1 

Bit 

1 
Bit 


T 

-+- 
4. 


20 
10 


hex 
hex 


T 

| Prompt switch 
| 1 - On 
|0 - Off 

|Scan switch 
| 1 - On 
|0 - Off 

L _,_,. , T1 „_» „ „ ..„ 


j 


1 
1 


CAINITSC 


T 
1 

1 

1 
4. 


1 

Bit 


T 
I 


08 


hex 


T ~ 

| Spec, call of SCAN? 
| 1 - Yes 
|0 ~ No 

4. 


1 
j 


1 
I 


CAENDSC 


T 

1 
1 
1 

_L 


1 

Bit 


T 
4. 


04 


hex 


ISCAN called by 'END 1 ? 
| 1 - Yes 
|0 - No 


1 


1 

1 


CACAPS 


T 

1 

1 
J 


1 

Bit 


T 
4. 


02 


hex 


| 1 - CAPS 
|0 - ASIS 


j 


1 


CANONUM 


1 

I 
I 


1 

Bit 


T 


01 


hex 


| 1 - NONUM 
|0 - NUM 


1 



CACFLAG2*s 

The following table indicates the values against which CACFLAG2 is 
compared. 

CACFLAG2 is control flag #2. Note: Bits 4-7 are reserved. 



i t r 1— 

ISymbolic Name | Size J Value | 



Meaning 



I 


CADSMODS 


I 

I 

I 

- 4- - 


1 

Bit 


— f- 
I 
I 
I 

. 4. 


80 


hex 


H 

|Dat 
M " 

|0 - 
j 


a set modified? 
Yes 
No 


-H 
j 


I 

I 


CARECFM 
CASCANON 


T 

I 
I 
— +— 
I 
I 

_ 4 


1 

Bit 

1 

Bit 


T 

l 

l 
_+- 

l 
I 


40 
20 


hex 


1 

M 
|0 

4. 


- 


FIXED format 
VARIABLE format 


J 


hex 


T 

M 

|0 

J 


- 


•SCAN* 
'NOSCAN 1 


1 
j 


I 


CAMODMSG 


i — 

I 
I 


1 

Bit 


T 

l 
I 


10 


hex 


|0 

M 


«. 


mode message not to be issued 
issue EDIT mode message 


i 
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CACFLAG3** 

The following table indicates the values against which CACFLAG3 is 
compared. 

CACFLAG3 has been equated to CAIMFLG. 

CACFLAG3 is control flag #3 indicating the flags used by INPUT. 
Note: Bits 6-7 are reserved. 



j Symbolic Name | Size | Value | Meaning I 



CAIMPT 



+ 



1 | 80 hex 
Bit | 



1 - Prompt 
- No prompt 



CAIMINS 



1 | 40 hex 
Bit | 



1 - INSERT Processing 

- NOT INSERT Processing 



CAIMSC 



CAIMIR 



1 | 20 hex 

I 
Bit | 

I 

1 | 10 hex 
Bit | 



1 - INPUT Entered from carriage 

return 
- Entered from other than 

carriage return 



I FORM 
R FORM 



CAIMCIN 



1 | 08 hex 
Bit I 



1 - Increment specified 

- Increment not specified 



CAIMSFPT 



1 | 04 hex 
Bit | 

L 



1 - INPUT will prompt 
- TCAM will prompt 
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CACFLAG4*? 

The following table 
compared. 



indicates the value against which CACFLAG4 is 



CACFLAG4 is control flag #4. Note: Bits 5-7 are reserved. 



_ T r _ 

| Value | 



1 Symbolic Name | Size 



Meaning 



CAPTGTBF 



CAFINDIS | 
I 
-+- 
I 



1 
Bit 

1 
Bit 



80 hex 
40 hex 



I 

I 

-+- 



CATPUTVF 



1 
Bit 



+~ 



20 hex 



1 - FIND issued 

- FIND not issued 

Buffer to be freed at 
exit from subcommand? 

1 - Yes 
- No 






Verify line to be printed 
at terminal? 
1 - Yes 

- No 



CAABEND 
CASCRC20 



-+- 

I 

I 

I 

I 
-+- 



1 
Bit 

1 
Bit 



10 hex 



1 - ABEND is in progress 
- ABEND not in progress 



08 hex 



1 - Syntax checker recovery in 

progress 
- Syntax checker recovery not in 

progress . 



H 



CAINPROC 



1 

Bit 



04 hex 






1 - Command procedure is current 

input source 
- Terminal is current input source 



CACFLAG6* 8 

Control flag #6. Note: Bits 3-7 are reserved. 



jSymbolic Name | Size I Value | 



Meaning 






1 


CAFREE 


- j- - 


1 

Bit 


_L 


80 


hex 


IGOFORT statement 
| 1 - FREE 
|0 - FIXED 


format 


j 


1 

1 


CACHAR48 


T 
_ J- - 


1 

Bit 


T 
I 


40 


hex 


| PL1 

M - 


48-character 

Yes 

No 


set? 


i 


CACHAR60 


T 


1 

Bit 


T 


20 


hex 


|PL1 

M - 
|0 - 


60-character 
Yes 

No 


set? 


1 
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CADSCODE*^ 

The following table indicates the values against which CADSCODE is 
compared. 

CADSCODE contains the data set type code. 



-T r 

j Value 



Symbolic Name | Size 1 



Meaning 



CANOTYPE 



byte | 00 hex 



No data set type entered 



H- 



CAPLIF 



byte | 01 hex 



PL/IF data set type 



CAFORTE 



byte 



| 02 hex 
+- 



FORTRAN E compiler type 



CAFORTG 



byte | 03 hex 



FORTRAN G compiler type 



CAFORTH 



byte 



04 hex 



FORTRAN H compiler type 



CATEXT 



byte | 05 hex 



Text data set type 



CADATA 



byte | 06 hex 



Data data set type 



1 

-i 

-I 



CACLIST 



I— 
b 



CACNTL 



CAASM 



I 
-+- 

I 
-+- 

I 



byte 
byte 
byte 



| 07 hex 

.+ 

| 08 hex 

j 15 hex 



Control list data set type 
Control data set type 
Assembler data set type 



CACOBOL 



I 



byte | 16 hex 



COBOL data set type 



CAFORTGI 



byte | 17 hex 



FORTRAN GI compiler type 



CAGOFORT 



byte | 1F hex 



GOFORT data set type 



CABASIC 



byte | 20 hex 



Basic data set type 



CAIPLI 



H 



I 



byte 



CAPLI 
CAEDTTYP 



byte 
byte 



I 21 hex 



IPL/I data set type 



| 22 hex 

| 32 hex 
1 



PL/1 data set type 

Maximum value for data set type 
that can be edited 



1 Note: Each 
entire byte. 



symbolic name refers to a bit-setting configuration of the 
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CADSATTR*io 

The following table indicates the values against which CADSATTR is 
compared, 

CADSATTR contains the data set attributes. Note: Bit 7 is reserved. 



ISymbolic Name| Size | Value j 



Meaning 



CARUN 



1 

Bit 



80 hex 



Executable under EDIT? 
1 - Yes 

- No 



CASCAN 



1 
Bit 



40 hex 



Syntax checking allowed? 
1 - Yes 
- No 



CACAPSRQ 



1 

Bit 



20 hex 






CACAPSDF 



1 
Bit 



10 hex 



CAPS required? 
1 - Yes 

- No 

1 - CAPS default 
- ASIS default 



+ 



CADSCONT 



1 
Bit 



08 hex 



Continuation remains in record? 
1 - Yes 
- No 



CALNNUM 



1 

Bit 



CALRECLX 



1 
Bit 



04 hex | Data set must be line numbered? 
1 - Yes 

- No 

02 hex |LRECL default required? 

1 - Yes 
- No 



CADSATR2*n 

The following indicates the value with its corresponding symbolic 
name against which CADSATR2 is compared. 

CADSATR2 contains data set attributes. Note: Bits 2-7 are reserved. 



r r t t- 

| Symbolic Name| Size | Value | 



Meaning 



| CALINTAB 
| CADSNDEF 


I 
I 
I 
-+- 
I 
I 
I 
I 

X _ 


1 

Bit 


-+- 

4 


80 


hex 


| Line number length in tab value? | 
| 1 - Yes | 

| - No | 

_ i- . . _ ,_.,.,. i 


1 

Bit 


40 


hex 


T — 1 

JDSTYPE is data set name qualifier | 
Idefault? | 
| 1 - Yes | 
| - No | 

4- 4 


| CARUNDS 


T 

I 
I 
I 

— J. 


1 
Bit 




10 


hex 


I Prompter accepts in-core source | 

I 1 - Yes | 

I'O - No | 
i _ __ i 


r~ — 

| CAOBJGEN 

1 
I 


1 
1 

1 

1 


1 
Bit 


I 


20 


hex 


j. — - — - _ j 

| Is an object data set generated? I 
j 1 - Yes | 
f0 - No I 
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CARECFMD**2 

The following table indicates the values against which CARECFMD is 
compared. 

CARECFMD contains record format codes. Note: Bits 2-7 are reserved. 



| Symbolic Name | Size 1 | Value | Meaning I 

j CARECFMF | 2 Bits | 80 hex | Fixed record format | 

| CARECFMV | 2 Bits | 40 hex | Variable record format | 

j. 4 + + .] 

| CARECFMU | 2 Bits | CO hex | Undefined record format | 

i j i j P i 



1 Note: Each symbolic name refers to a bit-setting configuration of 
bits and 1 . 



CAEDFLAG**3 

The following table indicates the values against which CAEDFLAG is 
compared. 

CAEDFLAG is the control flag for the EDIT data set. 



ISymbolic Namej Size | Value 



Meaning 



f- 


CAEDITDS 


+— 

1 


1 


— H 


80 


hex 


-+ 

I 1 - 


EDIT data set 




.j 


f- 




1 
+_ 

1 


Bit 


— H 






|0 - 


SAVE data set 




H 


CAEDFNCP 


1 


ao 


hex 


j Final copy to be performed? 






1 

1 


Bit 








I 1 " 

|0 - 


Yes 
No 






1 




_L 




. _L 






™ .i — . 






j 


1 


CAEDINCP 


T 

1 


1 


T 


20 


hex 


T 

| Initial copy to be 


performed? 


1 






1 
1 


Bit 








1 1 - 
|0 - 


Yes 

No 






1 




4. 




- 4. 




hex 


-+ 

I 1 - 


DISP = OLD 




H 


1 


CAEDDISP 


l 


1 


T 


10 






1 


Bit 








|0 - 


DISP = NEW 






1 




4_ 




. _L 






4. ._ > 






j 


i 


CAEDMEM 


T 

l 


1 


T 


08 


hex 


T 

| Member exists? 




1 






1 
1 


Bit 








I 1 ~ 
|0 - 


Yes 
No 






1 . 




4. 




. J. 






4. 






j 


1 


CAECDSOR 


T 

1 
1 


1 
Bit 


T 


04 


hex 


I o - 


DSORG = PO 
DSORG = PS 




— -j 


J 




J. 




. J. 






J_ 








1 
I 


CAEDUNCG 


T 

1 

1 

4. 


1 


T 


02 


hex 


T 

I 1 - 

I o - 

1 


UNCATLG 
CATLG 




j 


1 


CAEDALOC 


1 


1 


T 


01 


hex 


T 

|Dat 


a set allocated? 


- — — I 






1 










1 1 - 


Yes 










1 










|0 - 


No 
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CASAFLAG*** 

The following table indicates the values against which CASAFLAG is 
compared. 

CASAFLAG is the control flag for the SAVE data set. 



r- - — - ■ -T- 

ISymbolic Name| 

i ..,„ __. , i 


Size 


T 
I 


Value 


~1 

| Meaning 

J „ i, ._ ..„ „_^ m . ,_ L . . L 


1 

1 
j 


r 

| CASAVEDS 

L ... , „ , . ._ ,, 


_ _L 


1 

Bit 


T 
I 


80 hex 


I 

| 1 - EDIT data set 
|0 - SAVE data set 

, i _„.,,. „.. .„,..„. „ _. , u ._^ , 


1 
j 


f 

| CASAFNCP 

i. ,. ,,.. ^ 


T 
- 4- 


1 

Bit 


T 
t 


40 hex 


1 

| Final copy to be performed? 
| 1 - Yes 
| - No 
j 


J 


| CASAINCP 

L .,_ ...,_ . 


T 


1 
Bit 


T 


20 hex 


T 

| Initial copy to be performed? 
I 1 - Yes 
|0 - No 


1 


| CASADISP 

L 


T 
_ J_ 


1 

Bit 


_L 


10 hex 


T 

| 1 - DISP = OLD 
|0 - DISP = NEW 

._ .1 ™ -._.„ .„ .„ „,„„ ^._ ,„ 


_ j 


r 

| CASAMEM 

| CASADSOR 

i ^ 


T 

-+- 


1 
Bit 

1 

Bit 


T 

-+- 


08 hex 
04 hex 


__f.._. _ 

| Member exists? 
| 1 - Yes 
| - No 

| 1 - DSORG = PO 
| - DSORC = PS 

._!. _. ^- ™ .„ ._ m 


H 

— J 


1 ■ ■" 

| CASAUNCG 


- 4- 


1 
Bit 


T 


02 hex 


I 

t 1 - UNCATLG 
| - CATLG 
j 


1 
J 


| CASAALOC 


T 


1 
Bit 




01 hex 


T 

| Data set allocated? 
I 1 - Yes 
|0 - No 


1 
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CASYNSW*is 

The following table indicates the values against which CASYNSW is 
compared. 

CASYNSW contains the list switches. Note: Bits 6 and 7 are 
reserved. 

| Symbolic Name | Size | Value | Meaning | 



1 


CASYNLN 


4. 


1 

Bit 


I 
I 
I 


40 


hex 


|Line numbered? 
| - Yes 
| 1 - No 

4- 


J 


1 
1 


CASYNIS 


T 
A. 


1 

Bit 


T 

I 
I 
I 

J. 


10 


hex 


T 

| Diagnose incomplete statements? 
|0 - Yes 
j 1 - No 


1 
j 


1 


CASYNRFM 


T 

_L 


1 
Bit 


T 

I 
I 

J. 


08 


hex 


|0 - FIXED format 
| 1 - VARIABLE format 

4- -. 


1 
j 




CASYNSF 
CASYNML 
CASYNSCN 


1 1 
1 1 

1 1 


1 

Bit 

1 

Bit 

1 

Bit 


T 

I 
I 

I 
I 

I 
I 


04 
02 
01 


hex 
hex 
hex 


T ~ 

|0 - Standard form 
| 1 - Free form 


1 
-I 


|0 - LMSG 
| 1 - SMSG 

jO - SCAN 
| 1 - NOSCAN 


1 

— -i 



CAMAWKA *ie 

The following table describes the structure of CAMAWKA. 



I 1 T T 1 

ISymbolic Name] Size | Value | Meaning 1 



7 | NA 

Bytes 

1 

Byte 



MACFLAGS 
MAECTMOD 
MAABBREV 
MAENDPRC 



MACFLAG2 
MATABLE1 



1 

Bit 

1 

Bit 
1 

Bit 
5 

Bits 

1 

Byte 

1 
bit 
7 
Bits 
!_ 4_ 



80 hex 
40 hex 
20 hex 



80 hex 



Work Area 



Control Flags (next 8 bits) 



ECT modified to delete second-level 

msg 
Subcommand name/abbreviation flag 

END processing complete 

Reserved. 



Control flags (next 8 bits) 
IBM/user table indicator 
Reserved 






2 

Bytes 



NA 



Reserved 
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Processor Data Table (IKJEBEPD) 

The processor data table is the second Csect of the IKJEBEPS load' 
module. It contains processor-dependent information (attributes) and is 
searched by the processor data table search routine (IKJEBEPS) . 



1 T 

1 Disp 
| hex . 



T T 

Field 
Size 



Disp 
dec. 



Field 
Name 



f- 



Contents 



1 







CADSTYPE 



Data set type keyword 



CADSQUAL 



Data set name qualifier 



16 



10 



CABLKS 



Default block size 



12 



CALINE 



Line number offset 



f- 



19 



13 



CALENGTH 



Line number length 



20 



I 



14 



CATABS 



12 



Tabsetting values 



32 | 20 
|. + 

40 | 28 



41 



I 



CASYNAME 
CADSCODE 



-+ 



29 



CADS ATT R 



Syntax checker name 
1 | Data set type code 
1 



Data set attributes , Byte 1 



42 



2A 



CADSATR2 



Data set attributes, Byte 2 



43 



2B 



CARECFMD*iz 



Default record format 



44 



2C 



CAFLRLDF 



F format LRECL default 



46 



2E 



CAFLRLMX 



F format LRECL maximum 



48 



30 



CAVLRLDF 



V format LRECL default 



50 



32 



CAVLRLMX 



V format LRECL maximum 



52 



34 



CAULRLDF 



U format LRECL default 



f- 



54 



I 
-+- 



36 



CAULRLMX 



U format LRECL maximum 



56 



38 



CACHKOPT 



Syntax checker option word, Bytes 
and 1 



58 
66 
74 



3A 



CAPRNAME 



Prompter name 



42 



CAEXTNAM 



User exit name 



4A 



6 I Reserved storage 
1 , , 
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The following tables present processor data table field values for the 
various data set types. 

Table 33. Field Values for Data Set Types (1 of 4) 



Field 
Name 

I 

Field 
Values 



CADSTYPE 

+ 

PLIF 

FORTE 

FORTG 

FORTH 

TEXT 

DATA 

CLIST 

CNTL 

ASM 

COBOL 

FORTGI 

GOFORT 

BASIC 

IPLI 

PLI 



User- 
defined 
Other** 

JUnusable under EDIT- (See 




Table 33. Field Values for Data Set Types (2 of 4) 



| Field | 


~T 




i 1 




T~ 


1 


| Name | CADSTYPE 


CASYNAME|CADSC0DE*2 


CADSATTR*^ 


CADSATR2 


*3 |CARECFMD*«| 


1 „ ,, i 


L L- 


j 


L 1 


L 


L 




1 1 


r r 


1 


r 1 


r 


j. 




IField | PLIF 


PLIFSCANI 


• 01' 


'70' 


• 00» 




X'80' | 


lvalues | FORTF 


IPDSNEXC| 


•02' 


'72' 


'00» 




X»80' | 


| | FORTG 


IPDSNEXCI 


•03' 


'72' 


« 00' 




X'80' | 


| | FORTH 


IPDSNEXC| 


'04' 


'72' 


'00' 




X'80' | 


| | TEXT 


I 


1 05* 


•40' 


'40' 




X'40' | 


| | DATA 


I 


■06' 


• 10' 


• 40' 




X'80' | 


| | CLIST 


I 


•07' 


'3C 


'40' 




X'40' | 


| | CNTL 


I 


•os 1 


•32' 


' 40' 




X'80' | 


| | ASM 


I 


• 15» 


'B2' 


'60' 




X'80' | 


| | COBOL 


1 


• 16* 


•B2' 


•E0' 




X'80« | 


| | FORTGI 


IPDSNEXCI 


i 17 i 


'F2' 


'20' 




X'80' | 


| | GOFORT 


IPDSNEXCI 


i 1F i 


•DC 


• 40' 




X'40' | 


| | BASIC 


IKJNC211| 


'20» 


'F4' 


'40' 




X'40' | 


1 I IPLI 


IKJNC211| 


• 21 • 


'F4' 


' 40' 




X'40' | 


1 1 PLI 


PLISCAN | 


'22' 


'DO' 


•40' 




X'40' | 


| | User- 














| | Defined 


I 


f 22 , - , 36 t 


'10' 


1 10' 




X'80' | 


| | Other** 














L X J 


L X 




i 


L 


X 


j 


r "■" 

I^Unusable under J 


2DIT-see Table 34. 








— 1 


|*2 S ee Table 35 fo] 


c explanat 


ion of vali 


jes. 








|*3See Table 36 foj 


: explanation of vali 


les . 








|*«See Table 37 fo] 


c explanat 


ion of vali 


jes. 









372 EDIT 



TSO Command Processor PLM - Vol. 3 (Release 21) 



Table 33. Field Values for Data Set Types (3 of 4) 



( 1 


"T 







1" 




T- 


7" 






j Field [ 




















I Name iCADSTYPE iCAFLRLDF 


CAFLRLMX ! CAVLRLDF iCAVLRLMX iCACHKOPT 


CAEXTNAM ! 


j T „ 


n 




1 ""* ' 


r 




i 


T 




"" - " "1 


| Field ]PLIF 




80 


100 









j 


'0248' 


j 


i Values IFORTE 




80 


80 









i 


1 01 01 ' 


i 


i Ifortg 




80 


80 









o ! 


'0202' 


o I 


j J FORTH 




80 


80 









j 


'0002' 


j 


I ITEXT 







255 




255 




255 i 


•0000" 


i 


! [data 




80 


255 









255 ! 


'0000 1 


o ! 


| JCLIST 







255 




255 




255 | 


'0000' 


| 


I ICNTL 




80 


80 









i 


'0000' 


i 


! [asm 




80 


80 









o 1 


'0000' 


o ! 


! J COBOL 




80 


80 









| 


'0000' 


J 


t IFORTGI 




80 


80 









I 


'0402' 


l 


! Igofort 







255 




255 




255 ! 


'0302' 


o ! 


j [BASIC 







120 




120 




120 j 


•0100' 


j 


i IIPLI 







120 




120 




120 i 


'0000' 


I 


I iPLI 







100 




104 




104 j 


'0248' 


o ! 


J jUser- 




















i 'defined 




80 


255 









255 I 


'0000' 


o ! 


! !other*l 
















'oooo' 


o ! 


l i 


i 




L_ 


1 




1 


_L_ 


j 


_ _. _.. i 


i ** Unusable under 


- -- 
EDIT - 


See Tabl 


.e 


34 











TaDle 33. Field Values for Data Set Types (4 of 4) 



1 ■■" ' " — "1 


i 


i 







1 


i Field 












| frame 


CADSTYPE 


| CAULRLDF 


CAULRLi-iX 


CA'PRNAME 


f 


JFieid 


PL IF 











1 


jValues 


FORTE 















FORTG 















| FORTH 















TEXT 















DATA 


1 o 


I o 









CLIST 


l o 


I o 









CNTL 


I o 


1 | 









ASM 








| ASM 






COBOL 


I 





COBOL 






FORTGI 








FORT 






GOFOKT 


1 o 





GOFORT 






BASIC 


I o 


I o i 


IKJHC211 






IPLI 


I o 





IKJNC21 1 






PL I 


I o 


1 | 


PLI 






User- 












Defined 


I o 


I o 









Other* 1 

• 


■ 




L ... .. ,. , ,,. 




| * 1 Unusai3J 


Le under EDIT 


- See Table 


34 




„ J 
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Table 3L 



r — - 


T" 




"T" 




"T" 




T" 




~ T 


T 


- 1 


jField 
























|Name 


i 


CADSTYPE 


1 


CADSQUAL 


l 


CABLKS 


_L_ 


CALINE 


jCALENGTH 
j. 


| CATABS 

_x . 


1 


r 


1 




1 




1 




T 




T 


r "" 


1 


|Field 




STEX 




STEX 












I o 


| f 00' 




| Values 




OBJ 




OBJ 












I o 


| '00' 




1 




LIST 




LIST 




3556 




1 


I 8 


| ' 00' 




1 




LOAD 




LOAD 












I o 


| '00' 




1 




LINKLIST 




LINKLIST 




81 







I o 


| '00' 




1 




LOADLIST 




LOADLIST 




81 







I o 


| »00» 




1 




TESTLIST 




TESTLIST 




1695 







I o 


| '00' 




1 




OUTLIST 




OUTLIST 












I o 


| '00' 





Table 34, Field Values for Data Set Types Not Used With EDIT (2 of 4) 



| Field 
| Name 



| Field 
| Values 
I 
I 



I 



ICADSTYPE |CASYNAME 

.x x 



| STEX | 
|OBJ | 
jLIST | 
| LOAD | 
ILINKLISTj 
JLOADLISTI 
|TESTLIST| 
IOUTLIST j 

.J L 



CADSCODE*! 



'33' 

• 34» 
'35' 

• 36' 
'37' 
•38' 
•39' 
' 3A' 



CADSATTR*2 



'00' 
•00' 
•00' 
' 00' 
• 40' 
•40' 
'00' 
'00' 



CADSATR2* 2 | CARECFMD* 3 



•40' 
' 40' 
•40' 
'40' 
' 80' 
'80' 
' 40' 
•40' 



I 

|**See Table 35 for explanation of values. 
|* 2 See Table 36 for explanation of values. 
|* 3 See Table 37 for explanation of values. 

i 






' 40' 


'80' 
'80' 
'40' 





Table 34. Field Values for Data Set Types Not Used With EDIT (3 of 4) 



r ~ 


— I — 




— T" 




T" 




— r~ 




T 




— i 


JField 
























|Name 


X 


CADSTYPE 


X- 


CAFLRLDF 


4— 


CAFLRLMX 


4— 


CAVLRLMX 


J_ 


CAVLRLDF 


I 




T 




T 




•T 




T 




T 




I 


| Field 




STEX 
























| Values 




OBJ 

LIST 

LOAD 

LINKLIST 

LOADLIST 

TESTLIST 

OUTLIST 







81 
81 









81 
81 







148 



1695 






148 



1695 





L 


,, L_ 




X_ 








X- 




X 




j 



Table 34. Field Values for Data Set Types Not Used With EDIT (4 of 4) 



r - 

|Field 


T 




T" 


■ "1 




T" 




1 


| Name 

L 




QADSTYPE 


X- 


CAULRLDF | 


CAULRLMX 


X- 


CAPRNAME 


J 


r 






1 






1 




1 


jField 




STEX 




I 












| Values 

1 

1 

1 

1 

1 

1 




OBJ 

LIST 

LOAD 

LINKLIST 

LOADLIST 

TESTLIST 

OUTLIST 






I 



I 



j 


























L _ 


.. „L .,. 




x_ 






X- 




J 
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Table 35. Explanation of CADSCODE Field Values 

i 

Range of codes 
(base 10, inclusive) Meaning 
h ^ 

1-20 "Standard" EDIT data set types 

21-30 "Standard" EDIT data set types, except for 

having prompters which are IBM Program 
Products 

31-50 Data set types which are not IBM Type I, 

and/or whose compilers and syntax checkers 
are IBM Program Products 

51-255 Non-EDITable data set types 

i 



Table 36. Explanation of CADSATTR and CADSATR2 Field Values 

CADSATTR, 

Bit 0: Data set is executable under EDIT 

1: Syntax checking is available 

2: CAPS attribute is required 

3: CAPS is a default attribute 

4: Continuation-character must remain in record 

5: Data set must be line-numbered 

6: Default LRECL is required 

CADSATR2, 

Bit 0: Line number length is included in tab value 

1 : Data set type keyword is the default for this 

data set name qualifier 
2: Prompter for data set type generates an object data set 
| 3 : Prompter for data set type accepts in-core source input 
i 

Table 37. Explanation of CARECFMD Field Values 



| Setting Meaning I 

| X'UO 1 Variable format is default. | 

| X^O 1 Fixed format is default. I 

| X'CO* Undefined format is default. | 

L J 
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IBM- and User-Supplied Tables of Subcommands 

This table describes the formats of IKJEBMA8 and IKJEBMA9 which are the 
csects of the controller routine (IKJEBEMA) that contain the lists of 
available EDIT subcommands. 



, -j 1 

|Disp | Disp | Field 
|Dec. | Hex. | Name 

| | | None 



1 

Field| 

Size IContents 

1 | Length of subcommand name (m) 

., 



I 

I 1 



+ . 



| 1 | None 

H- + 

| m+ 1 | None 

I I 



|Subcommand name 



|m+ 1 

I 

j. 



1 j Length of subcommand name abbreviation 
I (n) 



H 



|m+2 | m + 2 | None 
j + . + 

|m+2 | m+2 | None 
I +n I + n | 

L J L 






n | Subcommand name abbreviation 

8 j Subcommand processor load module name 
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EDIT Access Method Work Area (UTILWORK) 



r — • 1 

| Disp 

|dec 

i j 


r i 

Disp 
hex 

i j 


r i 
Field 
Name 

L J 


— i 

Size 
Bytes 


— n 

Contents | 

, ,,. ...„ ... i 


1 — 1 
I o 


r 1 




r 1 
UTILDCB 


88 


r — 1 

BSAM deb | 


| 88 


58 


VTABLE 


4 


Pointer to vector table which contains! 
addresses of Access Method modules | 


| 92 


5C 


DCBBUFIO 


4 


Address of buffer being written | 


I 96 


60 


DCBBUFAD 


4 


Pointer to first buffer in chain | 


| 100 


64 


DCBWRKAD 


4 


Address of work buffer | 


| 104 


68 


DCBEBQX 


4 


Pointer to first empty block in chain | 


| 108 


6C 


DCBRECNO 


4 


Number records in utility data set | 


| 112 


70 


DCBNLEV 


2 


Level number of dsdb; see NLEV field | 
in dsdb | 


| 114 


72 




1 


Reserved | 


| 115 


73 


DCBSTATS*i 


1 


Status of data set | 


| 116 


74 


PRIMEKEY 


4 


Current reference key | 


| 120 


78 


SAVEKEY 


4 


Temporary storage of key | 


| 124 


80 


SECONKEY 


8 


Key/TTR of old block | 


| 132 


88 


THIRDKEY 


8 


Key/TTR of new block | 


| 140 


90 


PARM1 


4 


First word of parameter list | 


| 144 


94 


PARM2 


4 


Second word of parameter list | 


| 148 


98 


PARM3 


4 


Third word of parameter list | 


| 152 


9C 


XDAPWLST 


68 


List form of XDAP write | 


| 220 


E0 


WRITLIST 


20 


List form of BSAM write | 


I 240 


F4 


XDAPRLST 


68 


List form of XDAP read | 


| 308 


138 


TEMPAREA 


128 


Temporary work area | 


|436 


1B8 


SAVEAREA 


432 


Register save area | 
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DCBSTATS*! 

The following table indicates the meaning of the bit settings for the 
DCBSTATS byte. 



r - 

|Bit 
|0n 

L 


1 

Meaning I 


r 

10 
M 
13 
16 
17 


^^-- -■■■' ■- — -■- — -- \ 
Block must be re-organized. | 
Block to be split. | 
I/O in progress. | 
Empty data set. | 
I/O error. I 
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EDIT Access Method Control Blocks 



DATA BLOCKS 

The following table describes the data block control fields and their 
contents. 

Data Block Format 



Disp 
Dec. 



Disp 
Hex. 



Field 
Name 



Field I 

Size |Contents 



NUMREC 



2 | Number 
+ 



of records in the data block. 



DATASTRT 



2 |Pointe 

| into d 

+ 



r to where next record inserted 
at a block should go. 



H 



RECVSP 



(Number 
| space 
[by DAT 
| block . 



of bytes of recoverable, unused 
between the position pointed to 
ASTRT and the end of the data 



H 



6* 



6* 



Locator 
entry 



[Pointer to a record; the locator 
| entries are in ascending sequence 
Jbased on the key of the record to 
Jwhich they point. 



*Lowest-key entry 



DIRECTORY BLOCKS AND LOWER-LEVEL DIRECTORY BLOCKS 

The following table describes the control fields and contents of the 
directory block and the lower-level directory blocks. 

Directory Block Format 



Disp 
Dec. 



t r 

Disp 
Hex. 



f- 



Field 
Name 



T 1 

Fieldj 

Size | Contents 



■+- 







NLEV 



2 |DSDB - Number of LLDB levels 
JLLDB - Level number of this LLDB 
| A zero-level block always points to a 
I data block. 



NUMINDEX 



f- 



2 | Number of entries in block. 
+ _ 

7 | A 4-byte binary key value and a 3-byte 
|TTR; the 3-byte TTR points to a data 
| block or to a lower-level directory 
| block; the 4-byte key indicates the 
|highest key value in that data block 
| or lower-level directory block. 



4* 



4* 



Index entry 



♦First entry 
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BUFFERS 

The following table describes the buffer control fields and their 
contents. 

Buffer Format 



Disp | 
dec. | 



Disp | 
hex. I 



Field 
Name 



Field 
Size 



Contents 



H 







h 



I 



I 
h +- 

I 



BUFCHAIN 



4 J BUFSTATS 
I 



+■ 



Address of the next buffer in the 
chain, or zero if this buffer is the 
last in the chain. 

*1 IFlags indicating the status of the 
buffer. See * below. 

H 



5 I BBKCHAIN 
I 
I 



Address of previous buffer in chain, 
or zero if this buffer is the first in 
the chain. 



h +- 

12 I 



8 j SUFTTR 



C | BUFREF 



| TTR of the physical block which was 
|last read into this buffer, or into 
|which this buffer is to be written. 

| Address of index entry or record 
jlocator last found. 



*Note: Bit__on Meaning 

Euffer updated 

1 Block in buffer 

4 New block 

5 BSAM operation 

6 XDAP read 

7 XDAP write 



Command Buffer (CBUF) 



T T 

Field | 

Size | Contents 



Disp 
Dec. 



Disp 
Hex. 



Field 
Name 



CBUFLNG 
CBUFOFF 

CBUFDATA 



2 ILength of Command Buffer. 

I 
2 | Offset to first unscanned byte of 
I data field. 
I 
VAR |Variable length data field containing 

ia command and its operands. 
j 
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Command Processor Parameter List (CPPL) 



r i 

IDisp 
|Dec. 


r i 
Disp 
Hex. 


r i 

Field 
Name 


Field 
Size 


T' " " 

I Contents 
i 


*- — i 

1UI , ,., „ _,..,_ j 


1 o 





CPPLBUF 


4 


1 

| Pointer to the 


- - — 1 

Command Buffer (CBUF) . | 


1 4 


4 


CPPLUPT 


4 


| Pointer to the 
| (UPT) . 


User Profile Table | 


1 8 


8 


CPPLPSCB 


4 


| Pointer to the 
1 Block (PSCP) . 


Protected Step Control | 


1 12 


C 


CPPLECT 


4 


| Pointer to the 
ITable (ECT) . 


Environment Control | 



Command Scan Parameter List (CSPL) 



r ■""■ -i 

IDisp 

|Dec. 
i 


r 1 

Disp 
Hex. 

L . , u . 


Field 
Name 


r - '■ ■ -■ 

Bytes 
Size 


r -■" — — — "i 

Contents | 


1 o 





CSPLUPT 


4 


Address 
(UPT) . 


of the User Profile Table j 


1 4 


4 


CSPLECT 


4 


Address of the Environment Control | 
Table (ECT) . | 


1 8 


8 


CSPLECB 


4 


Address 
(ECB) . 


of the Event Control Block | 


1 12 


C 


CSPLFLAG 


4 


Address 

X'00' - 

X»80' - 
name 


of a Flag Word set as follows: | 
syntax check command name | 
do not syntax check command | 


I 16 


10 


CSPLCSOA 


4 


Address 
Area. 


of the Command Scan Output | 
(CSOA) | 


| 20 


14 


CSPLCBUF 


4 


Address 


of Command Buffer (CBUF) . | 
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Command Scan Output Area (CSOA) 



« — — 1 
| Disp 
|Dec. 


r *- 
Disp 
Hex. 


"T" 


Field 
Name 


■ "T T™ - 

| Bytes | 

|Size | Contents 




— i 


i- -i 




1 




. j 




1 1 




j 


r 1 

I o 





1 


CSOACNM 


T 


4 


1 1 

| Address 
| invalid) 


of command name (0 if 


1 


1 <* 


a 




CSOALNM 




2 


| Length o 


f command name. 




1 6 


6 




CSOAFLG 

CSOAVWP 

CSOAVNP 

CSOAQM 

CSOANOC 

CSOABAD 




1 

1 


j Flags se 

ix'SO' - 

lx»ao f - 

| X 1 20 f - 

|X» 10* - 
|X f 08' - 
| Reserved 


t as follows: 
valid with parameters 
valid / no parameters 
guestionmark 
no command name 
invalid command name 
(0) . 
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DAIR Parameter Block (DAPB08) 



jDisp 
|Dec. 

L J 


Disp 
Hex. 

L . ,.. . I 


Field 
Name 

L J 


r ' i 
Bytes 
Size 

L ._ ,. J 


— — - - — "■" " • T 

Contents | 

. , , ... ,„ _. _, „ _ .._..„ tl _ j 


r 1 

1 o 


r — - -\ 



r 

DA08CD 


r — 1 
2 


1 

Entry Code X» 0008» . | 


1 2 


2 


DA08FLG 


2 


Flags set on return, as follows: | 
Bit Me_a.n.in_3_w_]ieji_.s_et j 

Data set allocated but secondary | 
error occurred. Register 15 | 
contains error return code. | 

1-15 Reserved (0) . | 


1 ^ 


4 


DA08DARC 


2 


Error return code from Dynamic | 
Allocation routines. | 


1 6 


6 


DA08CTRC 


2 


Error return code from Catalog | 
Management routines. | 


1 8 


8 


DA08DSN 


4 


Address of DSNAME Buffer. The format | 
of the DSNAME Buffer is as follows: | 

5x£§ Contents | 

0-1 The length, , in bytes, of the | 
DSNAME. | 

2-45 The DSNAME, left justified, and | 
padded to the right with blanks. | 


1 12 


OC 


DA08DDNM 


8 


DDNAME for the data set. If a | 
specific DDNAME is not required, this | 
field must contain 8 blanks; the | 
DDNAME to which the data is allocated | 
will be placed in this field. | 


| 20 


14 




8 


Unit Name desired. | 


| 28 


1C 




8 


Serial Number desired. Only the first| 
6 bytes are significant. | 

If the serial number is less than 6 | 
bytes, it must be padded to the right | 
with blanks. If the serial number is | 
omitted, the entire field must contain| 
blanks. | 


I 36 


24 




4 


Block size requested. The average | 
record length desired. | 


| 40 


28 




4 


Primary space quantity desired. The | 
high order byte must be zero, the low j 
order three bytes contain the space j 
quantity desired. If the quantity is | 
omitted, the entire field must be set | 
to zero. | 



(Part 1 of 3) 
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t r 

Bytes 
Size 



Disp 
Dec. 



Disp 
Hex, 



Field 
Name 



Contents 



H 



44 



2C 



48 



30 



52 



34 



60 



3C 



69 



45 



70 



46 



Secondary space quantity desired. The 
high order byte must be zero, the low 
order three bytes contain the space 
quantity desired. If the quantity is 
omitted, the entire field must be set 
to zero. 

Directory quantity desired. The high 
order byte must be zero; the low order 
three bytes contain the number of 
directory blocks desired. If the 
quantity is omitted, the entire block 
field must be set to zero. 

Member name of a partitioned data set. 
If the name has less than 8 
characters, it must be padded to the 
right with blanks. If the name is 
omitted, the entire field must contain 
blanks. 

Password for the data set. If the 
password has less than 8 characters, 
it must be padded to the right with 
blanks. If the password is omitted, 
the entire field must contain blanks. 

Bit settings that indicate the status 
of the data set, as follows: 

Mi£ Meaningly hen^set 

0-3 Reserved (0) 

4 SHR 

5 NEW 

6 MOD 

7 OLD 

Bit settings that indicate the normal 
disposition of the data set, as 
follows: 



Bit 
0-3 


Meaning,, when, set 
Reserved (0) 


4 


KEEP 


5 


DELETE 


6 


CATLG 


7 


UNCATLG 



Bit settings that indicate the 
abnormal disposition of the data set, 
as follows: 

1 2ii H^3.HiH3- E hen_se t 

1 0-3 Reserved (0) 

4 KEEP 

5 DELETE 

6 CATLG 

7 UNCATLG 
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I Disp 
Dec. 



Disp 
Hex. 



Field 
Name 



Bytes 
Size 



Contents 



71 



47 



72 
75 



48 
4B 



Bit settings that control the 
operations to be performed by DAIR, as 
follows: 

Sit U^s^illil-When^set 



0-1 Specifies the type of units 

desired for the space parameters, 
as follows: 

■ 01'B units are in average block 
length 



MO'B units are in TRKS 
• 11 'B units are in CYLS 
Prefix userid to DSNAME 
ELSE is desired 



Data set is to be permanently 
allocated; not be unallocated 
until specifically requested. 



5 DUMMY data set is desired. 
6-7 Reserved (0) . 

Reserved (0) . 

Bit settings on return that indicate 
the organization of the data set, as 
follows: 

lit M§anin3_when_set 

Indexed Sequential (IS) 

1 Physical Sequential (PS) 

2 Direct Organization (DO) 
3-5 Reserved (0) 

6 Partitioned Organization (PO) 

7 Unmoveable 



(Part 3 of 3) 



Section 5: Data Areas 385 



DAIR Parameter Block (DAPB18) 



r i 


i — i 


r — i 


r~ -i 


r __ _ .. .... __, 


|Disp 


Disp 


Field 


Field 




| Dec. 


Hex, 


Name 


Size 


Contents | 


1 - 


L ._J 


I ._. j 




k — ■ — _. j 


I i 


r 1 


-j 




i 


1 o 





| DA18CD 


2 


Entry Code X 1 0018 1 | 


i 2 


2 


DA18FLG 


2 


Flags set on return , as follows: | 

Bit Meaning when set 1 

0-1 Reserved (0) | 
2 Prefix | 
3-15 Reserved (0) | 


1 4 


4 


DA18DARC 


2 


Error return code from Dynamic | 
Allocation routines. | 


1 6 


6 


DA18CTRC 


2 


Error return code from Catalog | 
Management routines. | 


1 8 


8 


DA18DSN 


4 


Address of the DSNAME buffer. The | 
format of the DSNAME Buffer is as | 
follows: | 

0-1 The length, in bytes, of the j 
DSNAME. | 

2-45 The DSNAME, left justified, and | 
padded to the right with blanks. | 


1 12 


C 


. DA18DDN 


8 


DDNAME of the data set to be | 
unallocated. | 


| 20 


14 




8 


Member name of a partitioned data set. | 
If the name has less than 8 | 
characters, it must be padded to the | 
right with blanks. If the password is| 
omitted, the entire field must contain| 
blanks. | 


| 28 


1C 




2 


SYSOUT class. An alphabetic or | 
numeric character. If SYSOUT is not | 
specified, this field must contain | 
blanks. | 


I 30 


1E 




1 


Bit settings that indicate the normal | 
disposition of the data set, as | 
follows: | 

Sit l§anin3_when_set | 

0-3 Reserved (0) | 

4 KEEP | 

5 DELETE | 

6 CATLG | 

7 UNCATLG | 
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r -- t— -r - i t — - ■ '""- 1 - -i 

|Disp | Disp | Field |Field| I 
|Dec. | Hex. | Name |Size |Contents | 

L X._ _ _.- X »» X - X -,.._ „ ™ JllJa „. „. 1Ui . ,,, ^ ._ -^ „_J 


r T 1 — 1 — t ■ 1 
| 31 | 1F | DA18CTRL | 1 |Bit settings that control DAIR | 
III | |operations, as follows: | 

III | I Bit Meaning^ when,, set | 

| | | | | 0- 1 Specifies the type of units | 
III || desired for the space parameters, | 
III | | as follows: | 

III || f 0I l B units are in average block | 
III || length f I0 f B units are in TRKS | 
III || ■II'B units are in CYLS | 

| | | | | 2 Prefix userid to DSNAME | 

| | | I I 3 RLSE is desired | 

| | | | | 4 Data set is to be permanently | 
III |l allocated; not be unallocated | 
III || until specifically requested. | 

| | | | | 5 DUMMY data set is desired. | 

III || 6-7 Reserved (0) . | 

| 32 | 20 | | 8 | The jobname for enqueuing SYSOUT data | 

III | |sets. If the jobname is omitted, the | 
III | | jobname will be taken from the TIOT. | 
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GETLINE Parameter Block (GTPB) 



r i 

| Disp 
|Dec. 

L J 


r i 
Disp 
Hex . 


r n 
Field 
Name 


Field 
Size 


T 1 

| Contents | 

i ,.... ,. „. ... ., ,, , r . ,.. r . _ j 


r i 

1 o 





PARMCNTL 


2 


I ■ ■■ - — ■■ 1 
j Control flags. Bit settings that | 
| indicate the operation to be | 
| performed, as follows: | 










I Bit 


Meaning,, wh en _ r set | 










| 0-2 


Reserved (0) . | 






PARMPHYS 




I 3 


The line of input is a physical j 
line, if zero, it is a logical | 
line. | 






PARMTERM 




|4 
|5-15 


The source of input is the | 
terminal; if zero, it is as 1 
pointed to by the top element on j 
the input stack. | 

Reserved (0) . | 


1 2 


2 


PARMTGT 


2 


|TGET 
| foil 

I Bit 

|0 

I 1-2 

13 

|4-6 
|7 


Options. Bit settings, as | 
dws: | 

U£anin3_when_set | 

Always set for TGET. | 

Reserved (0) . | 

NOWAIT was specified; if zero, j 
WAIT was specified. 1 

Reserved (0) . | 

ASIS was specified, if zero. | 
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PUTGET Parameter (PGPB) 



r i 

|Disp 
| Dec, 
i 


I" 1 "■""■ 1 

Disp 
Hex, 

i j 


i i 

Field 
Name 

L,._ „„ L a 


r 

Bytes 
Size 


r- — -- ■ ' - ■■ ™ - t 

| Contents j 

i .. , , ,. „ M , . .,. ,. i 


1 o 


r — 




PTGPCNTL 


2 


r ........ - - y 

[PUTGET Options. Bit settings that | 
[indicate the output operations to be | 
performed by PUTGET, as follows: | 










Bit 


I5£ilHiH3_J£j2£Il_s§t | 






PTGPBTO 




10 


Reserved (0) . | 






PTGPPUT 




| 1 


Reserved (0) . j 






PTGPDTMS 




2 


Always zero for PUTGET. | 






PTGPSNGT 




3 


Single-level format. | 






PTGPMLIN 




4 


Always zero for PUTGET. | 






PTGPMLEV 




5 


Multi-level format. | 






PTGPIFOR 




6 


Always zero for PUTGET. | 






PTGPPRMT 




7 


Prompt message. | 






PTGPMODE 




8 


Mode message. | 






PTGPDMND 




9 


Reserved (0) . | 






PTGPFORM 




10 


Reserved (0) . I 






PTGPBYPS 




I 11 


Bypass processing. The typing | 
element will not leave an | 
impression on the paper, but the | 
message will be received from the| 
terminal. | 






PTGPUNUS 




12-15Reserved (0) . | 


1 2 


2 


PTGPTPUT 


2 


TPUT Options Field. Bit settings that| 
indicate the TPUT options requested, | 
as follows: | 










Bit 


Meaning, when, set | 












1-2 
3 
4 
5 
6 
7 
[8-15 


Always zero for TPUT. | 
Reserved (0) . | 
NOWAIT processing requested. | 
Hold processing requested. | 
BREAKIN processing requested. | 
CONTROL processing requested. | 
ASIS processing requested. | 
Reserved (0) . j 


I 4 


4 


PARMAOUT 


4 


The address of the Output Line | 
Descriptor (OLD) for the message. | 
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Disp 

Dec. 

h 



PTGGCNTL 



10 



12 



Disp 
Hex. 



Field 
Name 



PTGGBITO 

PTGGGET 

PTGGPHYS 

PTGGTERM 

PTGGBRSV 

PTGGTGET 



PTGGADIN 



Bytes 
Size 



Contents 



GET Options. Bit settings that 
indicate the input operations to be 
performed by PUTGET, as follows: 

lit Mea.nin3_when^set 

Reserved (0) . 

1 Not used in PUTGET. 

2 Not used in PUTGET. 

3 Demand from terminal. 

4-15 Reserved (0) . 

TGET options. Bit settings that 
indicate the TGET options requested, 
as follows: 

Bit Meaning when, set 



Always set for TGET. 

1-2 Reserved (0) . 

3 NOWAIT processing requested. 

4-6 Reserved (0) . 

7 ASIS processing requested. 

8-15 Reserved (0) . 

The address of the input buffer in 
which the line is placed. 
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PARSE Parameter List (PPL) 



r 

| Disp 
JDec. 

L 


T - 

| He 

L _ 


sp 

X. 


"T" 

| 


Field 
Name 


■~"T "■■ " 1 

jBytes 
| Size 

L_ 


Contents 


i 
j 


r 

I o 


T 





1 


PPLUPT 


1 


4 


Address of the 
(UPT) 


1 

User Profile Table | 


I ^ 




4 




PPLECT 




4 


Address of the 
Table (ECT) . 


Environment Control j 


I 8 




8 




PPLECB 




4 


Address of the 


Event Control Block. | 


I 12 




C 




PPLPCL 




4 


Address of the 

(PCL) . 


Parameter Control List | 


I 16 




10 




PPLANSP 




4 


Address of the place where Parse will | 
place the address of the Parameter j 
Description List (PDL) . | 


| 20 




14 




PPLCBUF 




4 


Address of the 


Command Buffer (CBUF) . | 


| 24 




18 




PPLWORD 




4 


Reserved for the installation's use. j 
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PUTLINE Parameter Block (PTPB) 



r- 1 

|Disp 


r- " - i 

Disp 


r" i 

Field 


r T i 

Bytes 


— ■ 


" "" — - ~ ' ' ! 


|Dec. 


Hex. 

L ,.^ J 


Name 

1 r J 


Size 


Contents | 

_ . „ ,., ,. ,, .._,.. , 1 


1 o 





PAEMCNTL 


2 


- ■■ — - - i 

Control flags. Bit settings, as | 










folio 


ws: | 










Bit 


Meaning when set | 






PABMPUTO 







Reserved (0) . | 






PARMPUT 




1 


Put line (s) to the terminal. j 






PARMDTMS 




2 


Line contains data. If 0, line | 
contains message. | 






PARMSNGL 




3 


Line is single-level or | 
single-line. | 






PARMMLIN 




4 


Multi-line format. | 






PARMMLEV 




5 


Multi-level format. | 






PARMIFOR 




6 


Informational message. | 






PARMPRMT 




.7 


Reserved (0) . | 






PARMMODE 




8 


Reserved (0) . j 






PARMDMND 




9 


Reserved (0) . | 






PARMFORM 




10 


Format only. (Do not put out | 
message to the terminal) . | 






PARMUNUS 




I 11-15 


Reserved (0) . | 


1 2 


2 


PARMTPUT 


2 


TPUT 


Options field. Bit settings thatj 










indicate the TPUT options requested, | 










as follows: | 










Bit 


M^anin3_when_set j 










■0 


Always zero for TPUT. | 










I 1-2 


Reserved (0) . | 










3 


NOWAIT processing requested. | 










4 


HOLD processing requested. | 










5 


BREAKIN processing requested. | 










|6 


CONTROL processing requested. | 










7 


ASIS processing requested. | 










|8-15 


Reserved (0) . | 


1 4 


H 


PARMAOUT 


4 


The a 
(OLD) 


ddress of Output Line Descriptor | 
for a message or the address of | 










the fullword header for data. | 


! 8 


8 


PARMAFRM 


4 


The a 


ddress of the formatted line if | 










"format only" was specified. | 










Otherwise, the field contains zeroes. | 
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Syntax Checker Control Blocks 

The following tables describe the contents of the control blocks pointed 
to by the syntax checker parameter list. The topic "Syntax Checking" in 
Section 2: Method of Operation discusses EDIT's use of the syntax 
checkers. 



BUFFER 



Disp 
Dec. 



Disp 
Hex. 



Field 
Name 



Field 
Size 



Contents 



Number of records in buffer 
(maximum- 127) ; bit zero is set to 1 
when the syntax checker has scanned 
all records in the buffer. 



Chain 



Address of next buffer; set to zero if 
this is last buffer in chain. 



Record 



Variable 



Line or lines of source input data to 
be syntax checked; can be fixed- or 
variable-length, numbered or 
unnumbered. 



COMMAND INTERFACE (DELETE SUBCOMMAND) 



i 

| Disp 
|Dec. 



"T 

1 Field 

| Size 

-+ 



h 



Disp 
Hex . 



Field 
Name 



| Contents 







W0RD1 | 



| Reserved. 



H 



. + 

J Binary value of starting line number. | 
-I 



STARTV | 



_ + 

| Binary value of ending line number. | 
-j j 



STOPV | 



COMMAND INTERFACE (RUN SUBCOMMAND) 



i t r t t 

Disp | Disp | Field | Field | 

Dec. | Hex. j Name | Size j Contents 



h 



+ 

| Reserved. 







WORD1 



-+ h 

| CMDPTR | 

I I 

-+ 



+ 1 

| Pointer to command (if high-order byte 
|is X'SO 1 , operands are present). 

.+ ^ 1 



+- 

| TMPPRM | 
I I 



8 I 8 



| Pointer to Terminal Monitor Program 
Iparameter list. 
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SYNTAX CHECKER COMMUNICATION AREA 



Disp 
Dec. 



Disp 
Hex. 



Field 
Name 



None 



None 



Field 
Size 



Setting | Meaning (Instructions to Syntax Checker) 

bits 0-31 (where n=0 or 1) . 

Onnn IFirst entry - obtain and initialize 
work are; if a buffer chain is 
supplied, the syntax checker will set 
the relative line number counter to 
zero. 



Contents 



1n1n 



1000 



110n 



1001 



bits 4-7 



xxxx 



Last entry - release the work area and 
return; syntax checking is not 
performed. 

Normal entry - set relative line number 
counter to zero; perform syntax 
checking. 

Entry after return code of 8 (error - 
buffer checking incomplete) - continue 
syntax checking. 



Entry after re 
statements hav 
statement in i 
incomplete) - 
(chain address 
address is zer 
incomplete sta 
there is a new 
more input (ch 
address is not 
checking at th 

Reserved. 



turn code of 12 


(complete 


e been checked, 


but last 


nput buffer is 




if 1 there is no 


more input 


of last buffer 


or buffer 


o) , syntax chec 


k the 


tement and retu 


rn; if 


buffer chain, 


that is, 


ain address or 


buffer 


zero) , resume 


syntax 


e incomplete statement. 






Address of work area stored by syntax 
checker on first entry. 



H 



None 



xxxx 



f h 



Initial entry - maximum statement size 
specified at SYSGEN (if 0, checker 
assumes sufficient storage for largest 
legal statement is available) ; entry 
after return code of 4 (error detected, 
syntax checking complete, second-level 
message present) , or 8 (error detected, 
syntax checking incomplete) - address 
of error message area. 



H 



None 



I y + + + 



Initial entry - Temporary work 
subsequent entries - address o 
error message, if any. 



area; 
f second 



H 



12 



None 



xxxx 



Temporary storage area used foi 
GETMAIN. 



I I A- 
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OPTION WORD 



T T 

Field 
Size 



Disp 
Dec. 



Disp 
Hex. 



Field 
Name 



Contents 



Setting | Meaning 



h 



None 



X'OO' 


FORTRAN H level 


X'01' 


FORTRAN E level 


X'02' 


FORTRAN G level 


X'03' 


GOFORT 


x»04' 


FORTRAN G1 


X'OO 1 


IPLI level 


X»01» 


BASIC level 



xxxx 



f- 



Value of left source 
margin 



| Syntax Checker 

FORTRAN 
FORTRAN 
FORTRAN 
FORTRAN 
FORTRAN 

IPLI 
BASIC 

PL1F 



None 



bits 0-5 
bit 6=1 



bit 6=0 
bit 7=1 
bit 7=0 

bit 0=1 

bit 1=1 
bit 2=1 

bit 3=1 

bit 4=1 
bit 5-7 
xxxx 



Reserved 
FORTRAN 
Go defin 
loaded o 
FORTRAN 
Go defin 
loaded o 
FORTRAN 
be loade 
entry 
FORTRAN 
to be lo 
entry 



G/G1/H Code and 
ition to be 
n initial entry 
G/G1/H Code and 
ition not to be 
n initial entry 
E definition to 
d on initial 

E definition not 
aded on initial 



Entry from INPUT, 
Insert, linenum, *, 

CHANGE 

Entry from DELETE 

Entry from MERGE or 
RENUM 

Translation already 
complete 

Entry from RUN 

Reserved 

Value of right source 
margin 



FORTRAN 
FORTRAN 



FORTRAN 
FORTRAN 
FORTRAN 

IPLI or BASIC 

IPLI or BASIC 
IPLI or BASIC 

IPLI or BASIC 

IPLI or BASIC 
IPLI or BASIC 
PL1F 



None 



xxxx 



Record length of 
fixed-length records; 
binary zero, if 
variable-length records. 



All 
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T T 

Field 
Size 



| Disp 
[Dec. 



Disp 
Hex. 



Field 
Name 



Contents 



None 



Setting | Meaning 



| Syntax Checker 



bit 
bit 
bit 

bit 

bit 
bit 



= 
0=1 

1 = 
1 = 1 

2 

3=0 



bit 3=1 



bit 


4=0 


bit 


4=1 


bit 


5=0 


bit 


5=1 


bit 


6 = 


bit 


6=1 


bit 


7 = 



bit 7=1 



CHAR 60 

Char 48 

Line-numbered data set 

Data set not 

line-numbered 

Reserved 

Diagnose an incomplete 

statement 

Delayed scan - return 

with code of 1 2 if last 

statement in input 

buffer is incomplete; 

immediate scan - 

possible incomplete 

statement in buffer. 

Fixed-length records 

Variable-length records 

Standard form source 

input 

Free form source input 



SCAN or SCAN ON 

specified 

NOSCAN or SCAN OFF 

specified 



-+- 



H 



PL1 


or IPLI 


PLI 


or IPLI 


All 




All 




All 




All 





All 



All 
All 
All 

All 



All 



All 
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Section 6: Diagnostic Aids 



This section contains EDIT program messages, information about the use 
of TEST, and tables; the tables depict message, module and CSECT 
cross-reference information, error and exceptional conditions, and 
register usage. Given a diagnostic message, you can identify a 
particular module as the probable source of error by referring to the 
information in this section in the following manner: 

1. Obtain the diagnostic message. 

2. Determine the message number. Refer to "EDIT MESSAGES" if the 
message number has been suppressed from the diagnostic message. 

3. When the message number has been determined, refer to the MESSAGE 
CROSS-REFERENCE TABLE to obtain a list of module names. 

4. An error in one of these modules has resulted in the display of the 
diagnostic message. If, from knowing the operation that EDIT was 
performing, you know which modules were executing, refer to the 
ERROR AND EXCEPTIONAL CONDITIONS TABLE that relate to the modules. 
If you cannot determine which modules may have been executing at 
the time the error occurred, refer to the "module cross-reference 
table" or the "CSECT cross-reference table". 



Message Cross-Reference Table 



IMessage | 

| Number | Module Names 



|IKJ52301I|IKJEBEDA 
I- +- 



IKJEBEIN IKJEBESA 



|IKJ52302I| IKJEBEIN IKJEBESA 



h 



-+- 



|IKJ52303I|IKJEBEIN 
I +- 



IKJEBESA 



|IKJ52304I| IKJEBEDA IKJEBEIN IKJEBESA IKJEBEUI 



H 



-+- 



IIKJ52305IJIKJEBEDA 
I h 



IKJEBEUI 



| IKJ52 3061 | IKJEBEIN IKJEBESA 



h 



+ 



| IK J 52 3071 1 IKJEBEIN 
j. h 



|IKJ52309I| IKJEBEFC IKJEBEIN IKJEBEUI IKJEBEUT 



|IKJ52310I|IKJEBEIN 
| +_ 



IKJEBESA 



|IKJ52311I| IKJEBEIN IKJEBESA 
I- 



+ 

|IKJ52312I|IKJEBECG 
| |IKJEBEEN 
| |IKJEBEIS 
| |IKJEBERE 
| |IKJEBETA 
i j 



IKJEBECH 
IKJEBEFI 
IKJEBELI 
IKJEBERN 
IKJEBEUI 



IKJEBECI 
IKJEBEFO 
IKJEBELT 
IKJEBERU 
IKJEBEUP 



IKJEBECN 
IKJEBEIM 
IKJEBEMA 
IKJEBESA 
IKJEBEVE 



IKJEBEDE 
IKJEBEIN 
IKJEBEME 
IKJEBESC 



IKJEB 
IKJEB 
IKJEB 
IKJEB 



EDO 
EIP 
EMR 
ESN 
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h 



Message 
Number 



Module Names 



IKJ52313I 



IKJEBECG 
IKJEBEDO 
IKJEBEIN 
IKJEBEME 
IKJEBESN 



IKJEBECH 
IKJEBEEN 
IKJEBEIP 
IKJEBEMR 
IKJEBETA 



IKJEBECI 
IKJEBEEX 
IKJEBEIS 
IKJEBERE 
IKJEBEUP 



IKJEBECN 
IKJEBEFI 
IKJEBELI 
IKJEBERU 
IKJEBEVE 



IKJEBEDA 
IKJEBEFO 
IKJEBELT 
IKJEBESA 



IKJEBEDE 

IKJEBEIM 
IKJEBEMA 
IKJEBESC 



H 



IKJ52314I 



IKJEBEIN IKJEBESA 



h 



IKJ52315I 



IKJEBEDA IKJEBEIN IKJEBESA 



H 



IKJ52316I 



IKJEBEIN IKJEBESA 



h 



IKJ52317I 



IKJEBEIN IKJEBESA 



h- 



IKJ52318I 



IKJEBEDA IKJEBEIN IKJEBESA IKJEBEUI 



h 



IKJ52330I 



IKJEBEIN IKJEBESA 



h 



IKJ52331I 



IKJEBEIN IKJEBESA 



IKJ52332I 



IKJEBEIN 



IKJ52333I 



IKJEBEIN 



IKJ52334I 



IKJEBEIN 



h 



IKJ52335I 



IKJEBEIN 



IKJ52336I 



IKJEBEIN 



h 



IKJ52337I 



IKJEBECO 



h 



IKJ52338I 



IKJEBECO 



h 



IKJ52339I 



IKJEBESA 



h 



IKJ52340I 



IKJEBESA 



h 



IKJ52341I 



IKJEBESA 



h 



IKJ52342I 



IKJEBEIN 



h 



IKJ52343I 



IKJEBEIN 



h 



IKJ52360I 



IKJEBEIN 



h 



IKJ52361I 



IKJEBEIN 



j. „ 

IKJ52362I 
| 



IKJEBEIN 



IKJ52363I 



IKJEBEIN IKJEBESC IKJEBESN 



h 



IKJ52364I 



IKJEBEIN IKJEBESC IKJEBESN 



1~ 



IKJ52365I 



IKJEBEIN 



h 



IKJ52366I 



IKJEBEMA 



IKJ52367IJ IKJEBESC IKJEBESN 



(Continued 
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I T 

Message 
Number 



Module Names 



IKJ52400I 



IKJEBEIM 



IKJ52402I 



IKJEBEUT 



IKJ52421I 



IKJEBESA 



h 



IKJ52422I 



IKJEBEAE IKJEBECI 

Note: See the topic "Using the TEST command to diagnose 
errors in the EDIT program" for more information. 



h 



+- 



IKJ52U23I 



IKJEBERU 



h 



IKJ52424I 



IKJEBEEX IKJEBEIN 



IKJ52425I 



IKJEBECI 



h 



IKJ52500I 



IKJEBECG IKJEBECH IKJEBECN IKJEBELT 



|- 



IKJ52501I 



IKJEBEBO IKJEBEDE IKJEBEDO IKJEBEFI IKJEBEFO IKJEBELT 
IKJEBERE IKJEBESC IKJEBESN IKJEBETO IKJEBEUP 



f- 



IKJ52502I 



IKJEBEDE IKJEBELT IKJEBESC IKJEBESN 



IKJ52503I 



IKJEBEDE IKJEBELT IKJEBERN IKJEBESC IKJEBESN 



IKJ52504I 



IKJEBECG 
IKJEBERN 



IKJEBECH IKJEBECN IKJEBEDE IKJEBELT IKJEBERE 



h 



IKJ52505I 



IKJEBEDE IKJEBELI IKJEBEUP 



h 



IKJ52506I 



IKJEBECG IKJEBECH IKJEBECN IKJEBEFI 



IKJ52507I 
IKJ52550I 



IKJEBECG 
IKJEBELT 

IKJEBEME 



IKJEBECH IKJEBECN IKJEBEIM IKJEBEIP IKJEBEIS 



IKJ52552I 



IKJEBESA 



IKJ52553I 



IKJEBEME IKJEBESA 



f- 



IKJ52554I 



IKJEBESA 



IKJ52555I 



IKJEBEEN 



H 



IKJ52556I 



IKJEBETA 



h 



IKJ52558I 



IKJEBECG IKJEBECH IKJEBECN 



-+ 



IKJ52559I 
| 

IKJ52560I 



IKJEBECG 
IKJEBERE 



IKJEBECH IKJEBECN 



IKJ52561I 



IKJEBEIS 



IKJ52562I 



IKJEBETA 



IKJ52565I 



IKJEBERN 
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Using the Test Command to Diagnose Errors in the EDIT Program 

If an EDIT subcommand or a syntax checker, operating under EDIT, 
terminates abonrmally, the user is informed (via message IKJ52422I) that 
an ABEND has occurred. Assuming that the problem is reproducible and 
that the terminating program is not an EDIT subtask, the user can 
recreate the problem while EDIT is running under the TEST command. When 
the error occurs again, the user can then use TEST subcommands to obtain 
more information about the ABEND. The following sequence of commands 
will allow the user to run the EDIT program and to test it with the TEST 
command. 



READY 

test f sys1 .cmdlib (edit) f cp 

ENTER COMMAND FOR CP 
edit ■ datasetname' 



User identifies the command 
processor. 



User identifies the Edit 
data set. 



TEST 

load 'sysl.cmdlib (ikjebema) ' 



LOADED AT 
TEST 



User identifies the EDIT 
program controller routine. 



at ikjebema. ikjebeae (list lr* 1(104)} User places a breakpoint 

at the entry point of 
IKJEBEAE. 



TES^ 
go 



User starts program 
execution. 



EDIT 

subcommands of EDIT 



User recreates problen 



With this sequence of commands, the abnormal exit routine (IKJEBEAE) 
will receive control when the abnormal termination occurs. The 
breakpoint specified by the user will cause the TEST command to receive 
control. The LIST subcommand of TEST will display a 104-byte work area. 
In this area the user will find: 

• The PSW at the time of abnormal termination. 

• The last problem program PSW before abnormal termination. 

• The contents of registers through 15 at the time of abnormal 
termination. 

• The name of the terminating program. 

Note: A complete description of this work area can be found in the 

publication : IM-^stem/360_Operatin3_Sistemi MVT_Guide, GC28-6720 ; 

see the topic "STAE Macro"."" 

After this work area is displayed, the user can then employ the TEST 
subcommands to obtain more information about the program error. 
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EDIT Messages 

The following list contains the EDIT program messages. First-level 
messages are arranged in message number order. Second-level messages 
immediately follow the appropriate first-level messages; they can be 
identified by the asterisks which precede the message numbers. EDIT 
mode messages are included at the end of the list. 

IKJ52301I UTILITY DATA SET NOT ALLOCATED, TOO MANY DATA SETS+ 
DATA SET dsname 

*IKJ52301I USE FREE COMMAND TO FREE UNUSED DATA SETS 

IKJ52302I DATA SET dsname NOT ALLOCATED, DATA SET NOT ON VOLUME+ 

*IKJ52302I CATALOG INFORMATION INCORRECT 

IKJ52303I DATA SET dsname NOT ALLOCATED, REQUIRED VOLUME NOT 
MOUNTED+ 

*IKJ52303I VOLUME NOT ON SYSTEM AND CANNOT BE ACCESSED 

IKJ52304I UTILITY DATA SET 

DATA SET dsname NOT ALLOCATED, SYSTEM OR 
INSTALLATION ERROR+ 

*IKJ52304I DYNAMIC ALLOCATION ERROR CODE code 
♦IKJ52304I CATALOG ERROR CODE code 
*IKJ52304I CATALOG I/O ERROR 

IKJ52305I UTILITY DATA SET 

DATA SET dsname NOT ALLOCATED, NOT ENOUGH 
SPACE ON VOLUMES+ 

*IKJ52305I USE DELETE COMMAND TO DELETE UNUSED DATA SETS 
IKJ52306I DATA SET dsname ALREADY IN USE, TRY LATER+ 

*IKJ2306I DATA SET IS ALLOCATED TO ANOTHER USER OR JOE 

IKJ52307I DATA SET dsname NOT IN CATALOG 

IKJ52308I MEMBER member NOT IN DATA SET dsname 

IKJ52309I UTILITY DATA SET NOT USABLE+ 
DATA SET dsname 

*IKJ52309I OPEN ERROR CODE code 
*IKJ52309I I/O ERROR synadinfo 
*IKJ52309I CANNOT OPEN DATA SET 

IKJ52310I INVALID DATA SET NAME, dsname EXCEEDS 44 CHARACTERS 

IKJ52311I MEMBERmember SPECIFIED BUT dsname NOT A PARTITIONED 
DATA SET 

IKJ52312I NOT ENOUGH MAIN STORAGE TO EXECUTE COMMAND 

subcmd 

IKJ52313I COMMAND SYSTEM ERROR+ 

*IKJ52313I service rt'n ERROR CODE code 
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IKJ52314I DATA SET dsname RESIDES ON MULTIPLE VOLUMES, 
NOT SUPPORTED. 

IKJ52315I DATA SET dsname NOT RESOLVED, SYSTEM ERROR+ 

*IKJ52315I DEFAULT ERROR CODE code 

IKJ52316I DATA SET dsname WILL CREATE INVALID CATALOG STRUCTURE+ 

*IKJ52316I A QUALIFIER CANNOT BE BOTH AN INDEX AND THE LAST 
QUALIFIER OF A DATA SET NAME 

IKJ52317I DATA SET dsname NOT ON A DIRECT ACCESS DEVICE, 
NOT SUPPORTED 

IKJ52318I DATA SET dsname NOT ALLOCATED+ 

*IKJ52318I INVALID UNIT IN USER ATTRIBUTE DATA SET 
*IKJ52318I NO UNIT AVAILABLE 

IKJ52330I ISAM ORGANIZATION OF DATA SET dsname 

DIRECT NOT ACCEPTABLE+ 

*IKJ52330I ORGANIZATION MUST BE PARTITIONED OR SEQUENTIAL 

IKJ52331I RECORD FORMAT recfm NOT ACCEPTABLE 

IKJ52332I RECORD FORMAT V NOT ACCEPTABLE FOR type DATA SETS 

IKJ52333I BLOCK VALUE INVALID, USING value* 

*IKJ52333I MAXIMUM BLOCK VALUE IS DEVICE TRACK SIZE 

*IKJ52333I MAXIMUM BLOCK VALUE IS SYSGEN OPTION 

*IKJ52333I BLOCK VALUE MUST BE A MULTIPLE OF LINE FOR RECORD 

FORMAT F DATA SETS 
*IKJ52333I BLOCK VALUE MUST BE AT LEAST 4 GREATER THAN LINE FOR 

RECORD FORMAT V DATA SETS 

IKJ52334I BLOCK IGNORED, VALID FOR NEW DATA SET ONLY 
LINE 

IKJ52335I INVALID LINE VALUE FOR language, USING value* 

*IKJ52335I language REQUIRES A LINE SIZE OF 80 
*IKJ52335I LINE SIZE FOR type MAY NOT EXCEED line size 

IKJ52336I value INVALID LINE VALUE FOR type DATA SET 

IKJ52337I INVALID LINE NUMBER ENCOUNTERED+ 

*IKJ52337I USE EDIT WITH NONUM OPERAND 

IKJ52338I DATA SET dsname NOT LINE NUMBERED, USING NONUM 

IKJ52339I dsname ALREADY EXISTS 

IKJ52340A ENTER NEW NAME OR HIT CARRIER RETURN TO REUSE DATA SET- 

IKJ62341A ENTER NEW MEMBER OR HIT CARRIER RETURN TO REUSE MEMBER- 
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IKJ52342I INVALID LINE SIZE FOR NUM + 

*IKJ52342I LINE TOO SHORT FOR LINE NUMBERS 

IKJ52343I RECORD FORMAT F NOT ACCEPTABLE FOR GOFORT (FREE) + 

*IKJ52343I RECORD FORMAT V IS REQUIRED 

*IKJ52343A USE EDIT WITHOUT SPECIFYING LINE OPERAND 

IKJ52360I INVALID LINE NUMBER FIELD SPECIFIED 
(start col, end col) + 

*IKJ52360I STARTING COLUMN MUST BE WITHIN THE RANGE 73-80 
*IKJ52360I LINE NUMBER FALLS OUTSIDE RECORD SIZE 
*IKJ52360I LINE NUMBER FIELD OPERANDS ARE VALID FOR ASM 
DATA SETS ONLY 

IKJ52361I ASIS INVALID FOR type DATA SET, USING CAPS 

IKJ52362I NONUM INVALID WITH type DATA SET, USING NUM OPTION 

IKJ52363I function INVALID FOR language 

IKJ52364I function NOT AVAILABLE FOR language^ 

*IKJ52364I THE REQUIRED PROGRAM IS NOT AVAILABLE 
*IKJ52364I PROGRAM IS NO LONGER USABLE 

IKJ52365I INVALID SOURCE MARGIN (start margin, end margin) + 

*IKJ52365I SOURCE MARGIN SPECIFIED FALLS OUTSIDE LINE LIMITS 

IKJ52366I INVALID SUBCOMMAND subcmd 

IKJ52367I WARNING, SCAN MAY BE INCOMPLETE+ 

*IKJ52367I dstype SYNTAX CHECKER FAILED BUT 
SUCCESSFULLY RECOVERED 

IKJ52400I INPUT TERMINATED, NEXT LINE NUMBER IS number 

IKJ52402I LINE NUMBER LIMIT limit EXCEEDED 

IKJ52U21I NOT ENOUGH DIRECT ACCESS SPACE TO SAVE DATA SET 

IKJ52422I cmd ENDED DUE TO ERROR+ 
subcmd 

*IKJ52422I SYSTEM COMPLETION CODE IS code 
*IKJ52422I USER COMPLETION CODE IS code 

IKJ52423I type DATA SET CANNOT BE RUN 

IKJ52424I SYSTEM ERROR+ 

*IKJ52424I UTILITY DATA SET NOT UNALLOCATED, DYNAMIC 

DATA SET dsname ALLOCATION ERROR CODE code 

*IKJ52424I UTILITY DATA SET NOT UNALLOCATED, CATALOG ERROR 

DATA SET dsname CODE code 



| *IKJ52 42 4I FILE ddname NOT FOUND 

IKJ52425I COMMAND NOT FOUND - cmd name 
| IKJ525QQI END OF DATA 



Section 6: Diagnostic Aids 403 



IKJ52501I NO LINES IN DATA SET 

IKJ52502I DATA SET NOT LINE NUMBERED 

IKJ52503I INVALID LINE NUMBER RANGE 

IKJ52504I LINE NUMBER number NOT FOUND 

IKJ52505I TOP OF DATA SET 

IKJ52506I TEXT NOT FOUND 

IKJ52507I LINE number TRUNCATED+ 

*IKJ52507I LINE LENGTH IS length 

IKJ52550I NO OPERAND, SUBCOMMAND IGNORED 

IKJ52552I EDIT DATA SET dsname AND SAVE DATA SET dsname ARE NOT 
COMPATIBLE 

♦IKJ52352I EDIT DATA SET HAS RECORD FORMAT recfm, SAVE DATA SET 
HAS RECORD FORMAT recfm, USE ANOTHER DATA SET 

*IKJ52552I EDIT DATA SET HAS LINE SIZE line size, SAVE DATA SET 
HAS LINE SIZE line size, USE ANOTHER DATA SET 

*IKJ52552I EDIT DATA SET HAS BLOCK LENGTH blksize, SAVE DATA SET 
HAS BLOCK LENGTH blksize, USE ANOTHER DATA SET 

IKJ52553I SAVED, DATA SET IS EMPTY 

IKJ52554I BLOCK VALUE TOO LARGE FOR OUTPUT DEVICE, NOTHING SAVED 

IKJ52555I NOTHING SAVED 

IKJ52556I TABSET OF tabset EXCEEDS LINE SIZE OF line size 

IKJ52557I ONLY FIRST 10 VALID TABS USED 

IKJ52558I LINE OVERFLOW, NEW LINE CREATED 

IKJ52559I COUNT OR STRING MISSING 

IKJ52560I LINE NUMBER LENGTH EXCEEDS LINE SIZE 

IKJ52561I INSERT TERMINATED, NEXT LINE NUMBER IS number 

IKJ52562I TABSET OF IGNORED 

IKJ52565I INCOMPLETE SCAN FOR LINE NUMBER REFERENCES IN LINE 
(linenum) + 

*IKJ52565I SYNTAX ERROR OR NON-EXISTENT LINE NUMBER REFERENCED. 

IKJ52567A ENTER DATA SET TYPE 

IKJ5256 8I MISSING DATA SET TYPE 

MODE MESSAGES 

EDIT or E 

INPUT 

SAVED 

MERGED 

ENTER SAVE OR END- 
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I Module Cross-Reference Table 



T 1 

Flowchart 

ID 



Module Name 



Common Name 



IKJEBEAA | Load module for EDIT Access Method 

| (See next table for information about the 
jcsects of IKJEBEAA.) 

IKJEBEAE | Abnormal end exit 

IKJEBEAT | EDIT attention exit 

IKJEBEBO | BOTTOM subcommand processor 

IKJEBECG | CHANGE subcommand processor (2nd) 

IKJEBECH | CHANGE subcommand processor (1st) 

IKJEBECI | Command invoker 

IKJEBECN | CHANGE subcommand processor (3rd) 

IKJEBECO | Initial copy routine 

IKJEBEDA | Data Set ALLOCATION-FREE routine 

IKJEBEDE [DELETE subcommand processor 

IKJEBEDO | DOWN subcommand processor 

IKJEBEEX | EDIT Access Method final processing 
| routine 

IKJEBEFC | Final copy routine 

IKJEBEFI | FIND subcommand processor 

IKJEBEFO | FORMAT subcommand processing 

IKJEBEHE | HELP/PROFILE subcommand processor 

IKJEBEIM | INPUT subcommand processor (2nd) 

IKJEBEIN | EDIT initialization routine 

IKJEBEIP | INPUT subcommand processor (1st) 

IKJEBEIS | INSERT subcommand processor 

IKJEBELE | Line editing routine 

IKJEBELI | Line insert/replace subcommand processor 

IKJEBELT | LIST subcommand processor 

IKJEBEMA | EDIT controller routine 

IKJEBEME | MERGE subcommand processor 

IKJEBEMR j Translation routine 



MO 
Diag 



— 


| AB 


04 


AD 


05 


AE 


06 


AF-AK 


06 


AL-AN 


— 


AO,AP 


06 


AQ-AT 


— 


AU-AW 


— 


AX 


07 


AY-BA 


08 


BE,BF 


26 


BQ 


— 


BR,BS 


09 


BT 


10 


BU,BV 


11 


BW 


12 


BX-CB 


01 


CC,CJ 


12 


CK,CL 


13 


CM,CN 


— 


CO 


14 


CP,CQ 


15 


CT-CV 


02 


CW-CY 


16 


CZ,DA 


— 


DB 
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,.. - -, 

(Module Name 

1 . .T 


r— ■ — 

Common Name 


4— 


■— — i 

MO 
Diag 

j 


r- n 

Flowchart! 
ID | 


IIKJEBEMS 


Message selection routine 


T 


1 


r ^ 1 
DC | 


JIKJEBEPS 


Processor data table search routine | 


— 


DH | 


IIKJEBERE 


RENUM subcommand processor 




18 


DJ-DM | 


IIKJEBERN 


BASIC renum service routine 




— 


DN | 


IIKJEBERU 


RUN subcommand processor 




19 


DP,DQ | 


IIKJEBESA 


SAVE subcommand processor 




20 


DR-EB | 


IIKJEBESC 


SCAN subcommand processor (1st) 




21 


EC-EG | 


JIKJEBESE 


String search routine 




— 


EH | 


IIKJEBESN 


SCAN subcommand processor (2nd) 




21 


EI-EN | 


IIKJEBETA 


TABSET subcommand processor 




22 


EO | 


JIKJEBETO 


TOP subcommand processor 




23 


EP | 


JIKJEBEUI 


EDIT Access Method initialization 


routine | 


26 


EQ | 


IIKJEBEUP 


UP subcommand processor 




24 


ER,ES | 


IIKJEBEUT 


EDIT Access Method interface routine | 


27 


ET | 


IIKJEBEVE 


VERIFY subcommand processor 




25 


EU | 
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I CSECT Cross-Reference Table (Module IKJEBEAA) 



r — i 


i 


r — "i 
MO | 


r — - 1 

Flowchart | 


| Csect Name 


Common Name 

L „ . _. _, „ mi , __ ™, J 


Diag 


ID | 

U 4 




r — — -j,. 


r 1 


JIKJEBEAD 


TTR assignment routine 


33 


aa i 


IIKJEBEAS 


Buffer assignment routine 


36 


AC | 


JIKJEBEDL 


Record delete routine 


32 


BB-BD | 


IIKJEBERE 


Delete operation 


30 


BG | 


IIKJEBEDS 


Directory search routine 


37 


BH-BJ | 


jIKJEBEDU 


Directory update routine 


34 


BK-BO | 


IIKJEBELO 


Record locate routine 


31 


CR,CS | 


IIKJEBEMV 


Move routine 


— 


DD | 


IIKJEBERE 


Read block routine 


38 


DI | 


IIKJEBERR 


Read operation 


2 9 


DO | 


IIKJEBEWA 


Wait routine 


39 


EV | 


IIKJEBEWB 


Write block routine 


35 


EW | 


IIKJEBEWR 


Write operation 


28 


EX-FA | 
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Error and Exeptional Conditions Tables 

These tables provide information about module processing that is a 
result of error or exceptional conditions within the module or modules 
invoked. The same information is available at the CSECT level for the 
EDIT Access Method. The following is an index to these tables: 



| Module Name 

L -^ — 


Table N 


1 

jIKJEBEAD 


77 


IIKJEBEAE 


40 


IIKJEBEAT 


41 


IIKJEBEBO 


49 


JIKJEBECG 


50 


IIKJEBECH 


50 


IIKJEBECI 


42 


IIKJEBECN 


50 


IIKJEBECO 


43 


jIKJEBEDA 


44 


IIKJEBEDE 


51 


JIKJEBEDL 


76 


JIKJEBEDO 


52 


IIKJEBEDR 


74 


IIKJEBEDS 


80 


IIKJEBEDU 


78 


IIKJEBEEN 


53 


IIKJEBEEX 


70 


IIKJEBEFC 


45 


IIKJEBEFI 


54 


JIKJEBEFO 


55 


IIKJEBEIM 


56 


IIKJEBEIN 


38 


IIKJEBEIP 


56 


IIKJEBEIS 

L 


57 



IModule Name 



Table Number 



IKJEBELI 
IKJEBELO 
IKJEBELT 
IKJEBEMA 
IKJEBEME 
IKJEBEMR 
IKJEBEBB 
IKJEBERE 
IKJEBERN 
IKJEBERR 
IKJEBERU 
IKJEBESA 
IKJEBESC 
IKJEBESE 
IKJEBESN 
IKJEBETA 
IKJEBETO 
IKJEBEUI 
IKJEBEUP 
IKJEBEUT 
IKJEBEVE 
IKJEBEWA 
IKJEBEWB 
IKJEBEWR 



58 
75 
59 
39 
60 
46 
81 
61 
47 
73 
62 
63 
64 
48 
64 
65 
66 
69 
67 
71 
68 
82 
79 
72 



L 

Table 


., _. _ J. 

38. IKJEBEIN Error and Exceptional 


Conditions 


(Part 1 of 5) 


j 


r 
I 
| 


— „ — T ,_ _ _, , . 

Indication | Condition 

+ 


■' "r " 

I 
+ 


Action 


i 



IPARSE 
jReturn code 



= 4, 



IPARSE unable to prompt | Return to TMP, 
I I 



IPARSE 
IReturn code 



IPARSE interrupted by IReturn to TMP. 
jattention. | 

+ 



IPARSE 
IReturn code 



IPARSE received invalid | Issue message IKJ52313I, 
= 12. Iparameters. land return to the TMP. 
+- 



JPARSE 
JReturn code 



IPARSE unable to get 
= 16. JStorage. 



Ilssue message IKJ52312I, 
land return to the TMP. 



IIKJEBEPS 
JReturn code 



= 4. 



IKJEBEPS unable to 
validate data set 
type entered on EDIT 
command. 



|Issue message IKJ52313I, 
land return to the TMP. 



I 



-+- 



IIKJEBIN7 
IReturn code 



JIKJEBIN7 unable to IReturn to TMP. 
Jfully qualify data set j 
|name. | 
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Table 38. IKJEBEIN Error Ana Exceptional Conditions (Part 2 of 5) 



Indication 



Condition 



Action 



-+- 



IKJEBIN5 

Return code = 4. 



IKJEBIN5 unable to 
prompt for data set 
type. 



Return to TMP. 



DAIR 
Return code 



4. 



IKJDAIR received 
invalid parameters. 



Issue message IKJ52313I, 
and return to the TMP. 



DAIR 
Return code 



16, 



IKJDAIR found no 
available entries in 
TIOT. 



Issue message IKJ52301I, 
and return to the TMP. 



DAIR 
Return 



code =20. 



IKJDAIR found DDNAME 
currently unavailable. 



Issue message IKJ52313I, 
and return to the TMP. 



DAIR 
Return 
DARC = 
CTRC = 



code = 8, 
X'0000« and 
X'0004' 



IKJDAIR encountered 
a catalog management 
error . 



Issue message IKJ52303I, 
and return to the TMP. 



DAIR 
Return 
DARC = 
CRTC = 



code = 8/ 
X'0000' and 
X'0008' 



IKJDAIR encountered 
a catalog management 
error. 



Issue message IKJ52302I, 
and return to the TMP. 



DAIR 
Return 
DARC = 
CTRC is 
X 1 0004' 



= 8, 



code - o, 
X'0000'and 
other J - L ~ 



or 



than 
X 1 0008' 



IKJDAIR encountered 
a catalog management 
error. 



Issue message IKJ52304I, 
and return to the TMP. 



DAIR 

Return code 
12 and DARC 



8 or 
X' 1710' 



IKJDAIR encountered a 
dynamic allocation 
error. 



Issue message IKJ52316I / 
and return to the TMP. 



DAIR 

Return code 
12 and DARC 



8 or 
X 1 1704" 



IKJDAIR encountered a 
dynamic allocation 
error . 



Issue message IKJ52303I 
and return to the TMP. 



DAIR 

Return code = 8 or 
12 and DARC = X' 17XX» 
Where XX is other than 
• 10', '04' , or «08« 



IKJDAIR encountered a 
dynamic allocation 
error. 



Issue message IKJ52304I, 
and return to the TMP. 



DAIR 

Return code 12 and 

DARC = X' 1708' 



IKJDAIR encountered a 
dynamic allocation 
error . 



Prompt for 'NEW or 
'OLD'. If user enters 
• NEW , continue 
processing. If user 
enters 'OLD', issue 
message IKJ52307I, 
Return. 



DAIR 

Return code 12 and 

DARC = X'0218' 



IKJDAIR encountered a 
dynamic allocation 
error. 



Issue message IKJ52303I, 
and return to TMP. 



(Part 2 of 5) 



Section 6: Diagnostic Aids 409 



Table 38. IKJEBEIN Error and Exceptional Conditions (Part 3 of 5) 



Indication 



Condition 



I 



Action 



DAIR 

Return code 12 and 

DARC = X , 020C« or 

X , 0210 l 



IKJDAIR encountered a 
dynamic allocation 
error. 



Issue message IKJ52306I, 
and return to TMP. 



DAIR 

Return code 12 and 

DARC = X'0214 1 or 

X^IC 1 



IKJDAIR encountered a 
dynamic allocation 
error. 



Issue message IKJ52318I 
and return to TMP. 



h 



DAIR 

Return code 12 and 

DARC = X'0404' 

h 

DAIR 

Return code 12 and 

DARC = X»041C» 

DAIR 

Return code 12 and a 

DARC other than the 

above. 



IKJDAIR encountered a 
dynamic allocation 
error. 



Issue message IKJ52317I 
and return to TMP. 



IKJDAIR encountered a 
dynamic allocation 
error. 

IKJDAIR encountered a 
dynamic allocation 
error. 



Issue message IKJ52314I 
and return to TMP. 

Issue message IKJ52304I, 
and return to TMP. 



DSIDSORG is not X'02 1 , 
X'aO 1 , or X'OO' 



f- 



Data set allocated 
does not have a valid 
organization. 



Issue message IKJ52330I, 
and return to TMP. 



User entered a member 
name, but DS1DS0RG 

= x'ao 1 



Data set is not a 
partitioned data set. 



Issue message IKJ52311I 
and continue. 



H 



DCBOFLGS = B'XXXOXXXX' 



-f- 



Open failed for Edit 
data set when DSORG 
is partitioned. 



Issue message IKJ52309I, 
and return to TMP. 



BLDL 

Return code = 8. 



BLDL failed for member 
name. 



Issue message IKJ52313I, 
and return to TMP. 



BLDL 

Return coee = 4, 



BLDL could not locate 
member name. 



Prompt for f NEW» or 
'OLD 1 . If user enters 
1 NEW 1 , continue 
processing. If user 
enters 'OLD 1 , issue 
message 1KJ52307I and 
return to TMP. 



\~ 



End of TIOT reached 
without finding the 
DDNAME returned by 
IKJDAIR. 



DDNAME not found in 
TIOT. 



Issue message IKJ52424I, 
and return to TMP. 



UCBTBYT3 = B'XXOXXXXX 1 



Edit data set resides 
on a non-direct access 
device. 



Issue message IKJ52317I, 
and return to TMP. 



Obtain returned a non- 
zero return code. 



DSCB could not be read 
into core. 



Issue message IKJ52313I, 
and return to TMP. 
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Table 38. IKJEBEIN Error and Exceptional Conditions (Part 4 of 5) 

i r t 



Indication 



I 



Condition 



Action 



DS1RECFM is not X« 40« , 
X f 50 1 , X'80' , or X»90» 



Data set has a record 
format other than F, 

FB, V, or VB. 



Issue message IKJ52331I # 
and return to TMP. 



DAIR 

Return code = 4, 16, 

20, 24, and 28. 



Unallocation failed 
for data set. 



Issue message IKJ52313I, 
and return to TMP. 



DAIR 

Return code = 8 or 12. 



Unallocation failed 
for data set. 



Issue message IKJ52424I, 
and return to TMP. 



IKJEBIN8 

Return code = 4. 



IKJEBIN8 failed to 
validate command 
operands . 



Return to TMP. 



IKJEBECO 

Return code = 8, 



IKJEBECO encountered 
an I/O error on the 
utility data set or 
the edit data set. 



Return to TMP. 



IKJDFLT 

Return code = 24, 



-4 



IKJDFLT interrupted 
by attention. 



Return to TMP. 



IKJDFLT 
Return code = 



IKJDFLT unable to 
fully qualify data set 
name. 



Issue message IKJ52310I, 
and return to TMP. 



IKJDFLT 

Return code = 16. 



IKJDFLT unable to 
fully qualify data set 
name. 



Issue message IKJ52316I, 
and return to TMP. 



IKJDFLT 

Return code = 4 or 12* 



IKJDFLT unable to 
fully qualify data set 
name. 



Issue message IKJ52315I, 
and return to TMP. 



IKJDFLT 

Return code = 28 

or 32. 



IKJDFLT unable to 
fully qualify data set 
name. 



Issue message IKJ52313I, 
and return to TMP. 



h 



DS1LRECL does not 
conform to data set 
type requirements. 



LRECL invalid for data 
set, data set old. 



Issue message IKJ52336I, 
and return to TMP. 



Line value does not 
Conform to data set 
type requirements . 



Line operand invalid 
for data set type. 



Issue message IKJ52335I, 
and default accordingly. 



DEVTYPE 

return code not zero, 



DEVTYPE failed for old 
data set. 



Issue message IKJ52313I, 
and return to TMP. 
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Table 38, IKJEBEIN Error and Exceptional Conditions (Part 5 of 5) 
i — 



Indication 



I 



Condition 



"T" 



Action 



Block line not an 
integer or block less 
than line + 4. 



Block operand invalid 
for new data set. 



-4 



Issue message IKJ52333I, 
and default accordingly. 



Processor table entry 
does not permit scan 



SCAN specified for 
non-scanable data set 
type. 



Issue message IKJ52364I, 
and continue. 



BLDL for syntax 
checker failed. 



Syntax Checker not 
in user's system. 



Issue message IKJ52363I, 
and set CASYNAME to zero 



User specified N0NUM. 



Data set must be 
line numbered. 



Issue message IKJ52362I, 
and default to ' NUM» . 



NUM subfield operands 
are incorrect for ASM 
data sets, or were 
specified for other 
than ASM data sets. 



Start colum and length 
specified incorrectly. 



Issue message IKJ52360, 
and default accordingly, 



-+ 



DS1LRECL contains a 
value less than 8. 



LRECL less than or 
equal to 7 for old 
data sets. 



Issue message IKJ52342I, 
and return to the TMP. 



ASIS specified on 
command. 



Data set type requires 
capital letters. 



Issue message IKJ52361I, 
and default to caps. 



PLI or PLIF subfield 
specified incorrectly. 



Source margins 
invalid. 



Issue message IKJ52365I, 
and default to (2,72) . 



DS1RECFM 
is variable 
(old data set) 



RECFM=V data set 
invalid for type 
specified. 



Issue message IKJ52332I, 
and return to TMP. 



Line or block 
specified on command. 



IKJPTGT 

Return code 4, 16, 20, 

24 



Line and/or block 
specified for old data 
set. 

Command system error. 



Issue message IKJ52334I, 
and ignore. 

Issue message IKJ52313I 
and return to TMP . 



IKJPTGT 
Return code 1 2 



Trying to prompt in a 
procedure. 



Issue message IKJ52568I 
and return to TMP. 



IKJPTGT 
Return code 2i 
I- 

J BLDL 

| Return code 4 

i, 



Not enough storage 
available. 



Issue message IKJ52312I 
and return to TMP . 



User exit not in the 
system. 



Issue message IKJ52364I 
and return to TMP. 
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Table 39. IKJEBEMA Error and Exceptional Conditions 

i — 



Indication 



Condition 



Action 



Non-zero return code 
from STAX SVC. 



STAX (attention EXIT 
not established. 



Message IKJ52313I with 
return code insertion. 



Non-zero return code 
from STAE SVC. 



STAE (abnormal end 
exit) not established. 



Message IKJ52313I with 
return code insertion. 



IKJEBESC 
Return code 12. 



IKJEBESC initializa- 
tion of LANGPRCR 
failed. 



Return to TMP with 
return code 12. 



IKJEBESC 
Return code 16. 



IKJEBESC initializa- 
tion of LANGPRCR 
failed. 



Set CASCRC20 = 1 and 
Call IKJEBESC for 
recovery attempt. 



PUTGET 

Return code 12. 



PUTGET for mode 
message not 
successful. 



Set ECTMSGF to 1 and 
invoke PUTGET. 



PUTGET 

Return code 16, 20, 

or 24. 



PUTGET for mode 
message not 
successful . 



Message IKJ52313I with 
return code insertion. 



h- 



PUTGET 

Return code 28. 



PUTGET for mode 
message not 
successful. 



Message IKJ52312I. 



IKJSCAN 

Return code not 0. 



IKJSCAN unsuccessful 
in scanning buffer. 



Message IKJ52313I with 
return code insertion. 



Subcommand not found 
in IBM or user 
subcommand table. 



Invalid subcommand 
entered. 



Message IKJ52366I with 
subcommand insertion. 



Subcommand Processor 
Return code 12. 



Error return from 
Subcommand - I/O 
error in utility 
data set. 



return to TMP with 
return code 12. 



IKJEBEMS 

return code not 0. 



Unsuccessful attempt 
in putting message 
to user. 



Return to TMP with 
return code 12. 



+- 



Register contains 
a non-zero value for 
STAE retry routine. 



No work area pointer 
available in STAE 
retry routine. 



Issue SVC 3. (EXIT) 



Section 6: Diagnostic Aids 413 



Table 40. IKJEBEAE Error and Exceptional Conditions 

i 1 ' J r 



Indication 



Condition 



Action 



4- 



|SPAUTOPT (SVC 94) 
IReturn code = 4 



| Unable to stop |Set return code 

lautomatic line number land return. 

| prompting. ! 

4 



= 



H 

| Set return code 
jand return. 



IIKJEBMA2 | Unable to clean-up 

| Non-zero return code | stack. 



I- 



-+- 



IIKJEBEMS | Unable to put ABEND | Set return code 

| Non-zero return code | message to user. land return. 

L J —J 



Table 41. IKJEBEAT Error and Exceptional Conditions 



Indication 



Condition 



Action 



I 

IReturn without posting 
| attention ECB; no return 
| code set. 



I 



IGETLINE | Input line not 

INon-zero return code Jreturned from 

| | terminal. 

j. 

| SCAN 

| Non-zero return code | 

L L- 



4 

JCommand scan error, 



| Same as above . 



Table 42. IKJEBECI Error and Exceptional Conditions (Part 1 of 3) 

i 1 



| Indication 

STAE 

Return code = 4. 



| Condition 
No core available. 



— i 1 

| Action | 

Issue message IK152312I; 
| set return code to 8, 
return. 

H 



STAE 
Return code 



Invalid cancel or 
overlay request. 



Issue message IKJ52313I; 
set return code to 8, 
return. 



H 



STAE 

Return code = 12 



STAE routine or 
parmlist address 
invalid. 



Same as return code 
for STAE. 



STAE 

Return code = 16 



STAE not connected 
with users RB. 



Same as return code 
for STAE. 



H 



IKJSCAN 
Return code 



Invalid parameters, 



Issue message IKJ52313I; 
flush STACK; set return 
code to 8; cancel STAE, 
return. 



f- 



IKJSCAN 
Return code 



No core available, 



Issue message IKJ52312I 
flush STACK; set return 
code to 8; cancel STAE, 
return. 
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Table 42. IKJEBECI Error and Exceptional Conditions (Part 2 of 3) 



r — - 

| Indication 


1 ■ - 

| Condition 


" T "" — -" '- "I 

| Action | 


i . , . . , . 








.!„.. , rwm .„._ T .._ , lum l 


|BLDL 






| Command not found 


T ..- -- ■■] 

| Issue message IKJ52425I;| 


| Return code 

i _ _, _ ,. _„. 




4 


Jin system. 

x.^ - ™ _ --. , 


| flush STACK; set return | 
| code to 8; cancel STAE, j 
Jreturn. | 


I 

|BLDL 






T 

| I/O error. 


| Issue message IKJ52313I:| 


| Return code 

L 




8 




| flush STACK, set return | 
| code to 8; cancel STAE, | 
Ireturn. | 

- _L _» — ,.. _ ^ _ _ .„ . _^ ^ J 


r 

IGETMAIN 






j No core available. 


I 1 

| Issue message IKJ52312I;| 


| Return code 




4 


i 


| flush STACK; set return | 
| code to 8; cancel STAE, | 
Ireturn. | 

i „ , „ ,..,. ., _ j 


1 

IIKJSTCK 






l 

| Invalid parameters. 


| Issue message IKJ52313I;| 


IReturn code 
i 




4 


j , 


IFREEMAIN the LSD area; | 

| set return code to 8, | 

| cancel STAE; return. I 

.. j. i 


1 

IIKJPTGT 






1 

| Stack flushed. 


1 ■ "1 

IFREEMAIN EDIT buffer if | 


IReturn code 

i 







L 


| needed, cancel STAE. | 

| set return code to ; | 

Ireturn. | 

„ j. i 


1 ■ ■ 
IIKJPTGT 






T 

| Attention issued. 


T 1 

| Cancel STAE; return. | 


IReturn code 

i 


= 


8 


i 




I 

IIKJPTGT 






r 

| Second level infor- 


| Set ECTMSGF switch on; | 


IReturn code 


~ 


12 


| mational message 
Ipresent . 

,..„. JL _ ... _ 


|Re-issue PUTGET. | 


IIKJPTGT 






T 

| Second level 


| Flush STACK; cancel | 


IReturn code 
i 


= 


12 


Idiagnostic message 
| present. 

,. j ... ._. ,. ., 


JSTAE; return. | 

, , i .,_,.. ,. ..,.„ r „, . ,. ,. i 


r 

IIKJPTGT 






r 

INOWAIT for TPUT and 


T " 1 

llssue message IKJ52313I;| 


JReturn code 

L — — _ 




16 


| no line found. 


| flush STACK; set return | 
| code to 8; cancel STAE, | 
{return. | 


r 

IIKJPTGT 






INOWAIT for TGET and 


| Same as return code 16 j 


IReturn code 

L 


= 


20 


| no line found. 

,_ , i ,„ . 


|for PTGT. | 


IIKJPTGT 






■■■ l 

| Invalid parameters. 


I Same as return code 16 | 


IReturn code 


= 


24 




| for PTGT. | 
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Table 42. IKJEBECI Error and Exceptional Conditions (Part 3 of 3) 

1 



I 



Indication 



Condition 



Action 



|IKJPTGT 
JReturn code 



= 28 



No core available. 



|Issue message IKJ52312I; 
| flush STACK; set return 
| code to 8; cancel STAE, 
(return. 
+- 



ITCLEARQ 
IReturn code 



TCLEARQ unsuccessful. | Issue message IKJ52313I; 

| flush STACK if caller 
| was RUN; set return 
| code to 8; cancel STAE, 
jreturn. 



+ 



IIKJDAIR 

| Non-zero return code 



IKJDAIR unsuccessful. [Issue message IKJ52313I; 

| set return code to 8; 
| return. 

i 



(Part 3 of 3) 



Table 43. IKJEBECO Error and Exceptional Conditions 



Indication 



Condition 



I 



Action 



DCB not opened, 
DCBOFLGS * X» 10" 



Open error. 



Set return code of 8, 
issue IKJ52309I, 
return to invoking 
routine. 



H 



Return code from 
IKJEBEUI not 



IKJEBEUI does not 
complete successfully, 



Existing data set is 
closed, control is 
returned to the invoking 
module with a return 
code of 8. 



Line numbers out 
of sequence 



Invalid line number. 



Issue message IKJ52337I, 
set return code to 8 
and return to invoking 
routine. 



Invalid line number 



Data set not line 
numbered but data set 
type being used must 
be. 



Issue message IKJ52337I, 
return code of 8, return 
to the invoking module. 



h 



EOF with first read 
flag on 



Date set contains no 
logical records. 



Set return code to 4, 
return to the invoking 
module. 
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Table 44. IKJEBEDA Error and Exceptional Conditions 



Indication 



Condition 



Action 



1- 

IIKJDAIR 






+ 

| Invalid parameters. 


-+ 

|Put out 


IKJ52313I; 


set 


H 


IReturn code 

l „, „. „_ 


4 




j_ 


| return 
| return 


code to 8; 
to caller. 






IIKJDAIR 






T 

| Catalog management 


| Put out 


IK152304I; 


set 




IReturn code 


= 


8 


| error. 

.. _j, —_,. .-„ .,,■■ ..„■ 


| return 
| return 

L 


code to 8; 
to caller. 




i 


IIKJDAIR 






T — -,- 

| Dynamic allocation 


— T 

|Put out 


IKJ52304I, 




i 


IReturn code 


= 


12 


Jerror . 


IIKJ52303I, IKJ52305I, or | 










IIKJ52318I depending 


on 












| value in DARC field 


t 












| set ret 


urn code to 


8; 










L _ 


| return 


to caller. 




i 


IIKJDAIR 






|TI0T full. 


-■■ + 

|Put out 


IKJ52301I; 


set 


i 


IReturn code 

I 


= 


16 




I return 
| return 
i 


code to 8; 
to caller. 






r 

IIKJDAIR 






IDDNAME unavailable. 


T 

| Put out 


IKJ52313I; 


set 




IReturn code 

i... „... 


~ 


20 




I return 
| return 


code to 8; 
to caller. 






l 

IIKJDAIR 






4~" ~ r 

IDSNAME in concatenated | Same as 


return code 


20. 




IReturn code 


= 


24 


| group . 

,.. , , ,j. ,._ 


__L 






i 


IIKJDAIR 






T 

IDSNAME or DDNAME 


|Same as 


return code 


20. 


i 


IReturn code 


= 


28 


(unavailable. 

_ ,. ± ._ _ „„, 


i 






i 


IIKJDAIR 






T ■ - — 

IDSNAME in DSE more 


T 

|Same as 


return code 


20. 


i 


IReturn code 


= 


32 


|than once. 








i 


IIKJDAIR 






| Error in catalog 


|Same as 


return code 


20. 


i 


IReturn code 

1 


= 


36 


linformation routine. 

, ,., i , „ ..,„ „ _.,„ _, 


x 








IIKJDAIR 






T - 

IReturn area for 


T 

| Same as 


return code 


20. 




IReturn code 


= 


40 


| qualifiers filled. 
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Table 45. IKJEBEFC Error and Exceptional Conditions 



Indication 



Condition 



Action 



] 

|DCB not opened, 
jDCBOFLGS # X' 10' 
I 
I 

L 


+ 

|0PEN error. 

I 

1 

1 

j. „„_. , , .„ _. 


| Set return code of 8, 
lissue msg. IKJ52309I, 
| return to invoking 
| routine. 

i _ ... _.,. ... 


i 


IIKJEBEUT 
IReturn code = 4 

I 

i , , „ 


\ 

| Empty utility data 
Jset . 

1 
i 


^. _. ..._._ ^ 

| Set return code of 
| return to invoking 
| routine. 


4, 


l 
i 


IIKJEBEUT 
IReturn code = 8 
1 

L. 


I 

| I/O error in utility 

| data set. 

1 


T 

| Set return code of 
| return to invoking 
| routine. 

x , L .. 


12, 


l 
i 


r _ - 

|SYNAD error exit 

| control 

1 

1 


I 

gains | I/O error in QSAM 
|data set. 
1 
1 


t — ■ 

|Set return code of 8, 
lissue msg. IKJ52309I, 
| return to invoking 
| routine. 


I 



Table 46. IKJEBEMR Error and Exceptional Conditions 



I 



Indication 



Condition 



Action 



-+- 



| Syntax Checker 
[Return code = 4 



Error found, buffer 
checking complete. 



Continue processing. 



| Syntax Checker 
IReturn code = 8 



Error found, buffer 
checking incomplete. 



Put out message 
IKJ52313I; set return 
code of 4; return to 
caller. 



| Syntax Checker 
IReturn code = 12 



Last statement in 
buffer is incomplete. 



Same as return code of 



| Syntax Checker 
IReturn code = 16 
I 

I 

| Syntax Checker 
(Return code =20 



No core available. 



t 

IIKJEBEUT 
IReturn code 



— + 



Syntax checking not 
available. 



+ 



Put out message 
IKJ52312I; set 
return code to 4; 
return to caller. 

Set return code to 8 
and return to caller. 



Record not found. 



Set return code to 0; 
return to caller. 



IIKJEBEUT 
IReturn code = 8 



I/O error in reading 
utility data set. 



Delete new utility data 
set, set return code 
to 12; return to caller 
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Table 47. IKJEBERN Error and Exceptional Conditions 



I 



Indication 



Condition 



■+- 



Action 



IIKJEBEUT 
IReturn code of 4 



Line not found. 



Issue message IKJ52504I 
and return to caller 
with return code of 4. 



IIKJEBEUT 
IReturn code of 8 



I/O error, 



Return to caller with 
return code of 8. 



IGETMAIN 

IReturn code of 4 



GETMAIN for table 
space failed. 



Issue message IKJ52312I 
and return to caller 
with return code of 4. 



I Line number reference 
| unobtainable 



Invalid line reference 
or syntax error. 



Issue message IKJ52565I 
and return to caller 
with return code of 4. 



F 

|Line previous to first 

Irenumbered line is 

| greater than or equal 

| to first new line 

| number. 

i 



Invalid line number 
range. 



Issue message IKJ52503I 
and return to caller 
with return code of 4. 



Table 48. IKJEBESE Error and Exceptional Conditions 



I 



Indication 



I 



Condition 



Action 



IIKJEBEUT 
IReturn code 4 



| End of data set on 
| read. 



| Set return code 
Ireturn. 



IIKJEBEUT 
IReturn code 8 



| I/O error on utility | Set return code 12, 
| data set. Ireturn. 

_4- 4- 



Table 49. IKJEBEBO Error and Exceptional Conditions 



Indication 



I 



Condition 



Action 



IReturn code of 8 fromj I/O error in reading 
IIKJEBEUT | utility data set 

h 



Set return code of 12; 
return to IKJEEEMA. 



IReturn code of 4 from| Utility data set is 
IIKJEBEUT | empty 

I I I 

I I 

i j 



Set return code of 0; 
set * to zero; put out 
message IKJ52501I; 
return to IKJEEEMA. 
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Table 50. IKJEBECH, IKJEBECG # IKJEBECN Error and Exceptional Conditions 
(Part 1 of 2) 



Indication 



Condition 



Action 



IKJEBEUT 
Return code = 4 



Data set empty. 



Issue message IKJ52501I 
and terminate with 
return code of 8. 



IKJEBEUT 
Return code = 8 

IKJEBEUT 

Return code = 12 



I/O error in Edit 
data set. 



— + 



— + 



Line number exceeds 
sequence field length. 



Set return code of 12 
and terminate. 

Terminate with return 
code of 8. 



1 



IKJPUTL 
Return code 



Attention issued while 
in IKJPUTL. 



Terminate. 



IKJPUTL 

Return code = 16 



Not enough core 
available while in 
IKJPUTL 



Issue message IKJ52312I 
and terminate with 
return code of 8. 



IKJPUTL 

Return code not 

0,4,16 



PUTLINE not 
successful . 



Issue message IKJ52313I 
and terminate with 
return code of 8. 



IKJGETL 
Return code 



8 



Attention issued while 
in IKJGETL. 



Terminate. 



IKJGETL 

Return code = 16 

return code of 8, 



End of data reached 
while IKJGETL reading. 



Issue message IKJ52313I 
and terminate with 



IKJGETL 

Return code = 24 



Not enough core 
available while in 
IKJGETL. 



Issue message IKJ52312I 
and terminate with 
return code of 8. 



IKJGETL 

Return code not 

0,4,8,16,24 



Getline not 
successful. 



Issue message IKJ52313I 
and terminate, 
return code of 8. 



h 



IKJPARS 
Return code 



Required prompting 
could not be done by 
IKJPARS. 



Terminate with return 
code of 8. 



IKJPARS 
Return code = 



Attention issued while 
in IKJPARS. 



Terminate with return 
code of 0. 



IKJPARS 

Return code = 16 



Not enough core 
available while in 
IKJPARS 



Issue message IKJ52312I 
and terminate with 
return code of 8. 



IKJPARS 

Return code not 

0,4,8,16 



Parse not successful. 



Issue message IKJ52313I 
and terminate with 
return code od 8. 



No operands and 
UPTNPRM = 1 



NOPROMPT user and 
required operands not 
specified. 



Issue message IKJ52559I 
and terminate with 
return code of 8. 



IKJEBEUT 
Return code = 4 



Specified line number 
not in Edit data set. 



Issue message IKJ52504I 
and terminate with 
return code of 8. 



(Part 1 of 2) 
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Table 50. IKJEBECH, IKJEBECG, IKJEBECN Error and Exceptional Conditions 
(Part 2 of 2) 



Indication 



Condition 



I 



Action 



IKJEBEUT 
Return code = 4 



No line numbers in 
specified range in 
Edit data set. 



Issue messages IKJ52504I 
and IKJ52500I and 
terminate. 



IKJEBESE 

Return code of X 1 08» 



Text not found. 



Issue message IKJ52506I 
and terminate. 



IKJEBESE 

Return code of X f 0C 



I/O error in Edit 
data set. 



Set return code of 12 
and terminate. 



IKJEBELE 
Return code = 4 
and CANONUM =0 or 
CADSCODE not = CATEXT 



Changed line exceeds 
maximum record size 
and not NONUM TEXT. 



Issue message IKJ52507I 
and continue processing, 



IKJEBELE 
Return code = 4 
CADSCODE = CATEXT 



Changed lines exceeds 
maximum record size 
and NONUM text. 



Issue message IKJ52558I 
and continue processing, 



h 



IKJEBELE 
Return code = 
after return code = 4 



All overflow lines 
created. 



End line processing. 



LANGPRCR 

Return code = 16 



Not enough core while 
in LANGPRCR. 



Issue message IKJ52312I 
and terminate with 
return code of 8. 



-4 



LANGPRCR 
Return code 



8, 12 



Syntax error in 
changed line with 
return code of 8. 



Issue message IKJ52313I 
and terminate. 



f- 



LANGPRCR 

Return code = 20 



Internal error in 
LANGPRCR. 



Set return code of 16 
and terminate. 



IKJEBEUT 
Return code = 4 
after return code 



Some lines changed/ 
but not more lines 
in range specified. 



Issue message IKJ52500I 
and terminate. 



i~ 



(Part 2 of 2) 



All terminations are with a return code of except where indicated 
differently. 
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Table 51. IKJEBEDE Error and Exceptional Conditions (Part 1 of 2) 



| Indication 

i. ,_ ™_ ._. 


| Condition 


Action | 


i ■ ■■■ — 

IIKJPARS 

| Return code = 4 


T "1 

| Parse unable to j 
Iprompt. 


Return to IKJEBEMA, with| 
return code of 8. | 


IIKJPARS 
[Return code = 8 


| PARSE interrupted by | 
| attention. 


Return to IKJEBEMA, with| 
return code 0. | 


IIKJPARS JPARSE received invalid; 
JReturn code = 12 Iparameters. 

IIKJPARS | PARSE unable to get 
IReturn code = 16 (Storage, I 


Issue message IKJ52313I,| 
return with return code | 
of 8. | 

Issue message IKJ52312I,| 
return with return code j 
of 8. | 


| IKJEBEUT 
JReturn code = 8 


| Utility data set I/O j 
| error. 


Return to IKJEBEMA with | 
return code = 12. | 


1 2nd number less than 
J 1st number 


| Invalid line number 
| range. 

,i , . . ., ,,. . , ,. „ , , , 


Issue message IKJ52503I,| 
Return with return code | 
of 8. | 


| Line number entered 
|on subcommand 


| Data set non-line 
Inumbered 

L, IJ1U . , lllT „... ,,, . , T7 „ 1L . .,,„] 


Issue message IKJ52502I,| 
Return with return code | 
of 8. | 

L „.,. „. , ,._ ^.. „ , ,_,,,. 1L , lliaL ™ J 


IIKJEBEUT 

IReturn code = 4 

| (attempting to delete 

| first specified line) 

i 


'" 1 " 

ILine not found. 


' ' 1 

Issue message IKJ52504I,| 
return with return code | 
of 8. | 


i " — 
IIKJEBEUT 
IReturn code = 4 
|on delete current 
| operation (after 
| successful read) 


| Unable to delete line 
| after line read 
| successfully . 

L._ ™„„ _,„ „. J 


Issue message IKJ52313I,| 
return with return code | 
of 8. | 


| IKJEBEUT 

| Return code = 4 

| on read first when 

j first line of data 

I set was deleted 


t 1 

| Data set is empty. 

L J 


Issue message IKJ52501I,| 
set current line | 
pointer to zero. | 


| IKJEBEUT 
I Return code = 
ion read first when 
1 first line of data 

(set was deleted 
j- „ „.,_ „,_ „., _,. 


T ■" 1 

I Deleted line, or 

| lines, were at top of 

| data set. 


Issue IKJ52505I, set | 
current line pointer | 
to 0. | 

• _ — -.,„.,., .,»«_, ,..,_„ i 


ILANGPRCR 

IReturn code = 8 or 12 

I 


| Call "LANGPRCR" to 
| delete lines from 
I reverse Polish-notated 
| data set. 


r — ■ " "■ ■ "■"■ '"" 1 

llssue message IKJ52313I,| 
| return with return code | 
|of 8. | 
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Table 51. IKJEBEDE Error and Exceptional Conditions (Part 2 of 2) 



I 



Indication 



I 



Condition 



Action 



ILANGPRCR 
IReturn code = 16 
I 



[Not enough storage. 



I 



| Issue message IKJ52312I, 
|return with return code 
|of 8. 



j. 

ILANGPRCR 
IReturn code = 4, 
|CASCANSW=1, 



ILANGPRCR failed to put | Issue message IKJ52313I 
| out message. | and return to IKJEBEMA 

| |with return code of 8. 



| 

ILANGPRCR 
IReturn code 



+- 



| Call "LANGPRCR" to | Return to IKJEBEMA 
= 20 |delete lines from |with return code of 16. 
| reverse Polish-notated | 
jdata set. | 

j x 
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Table 52. IKJEBEDO Error and Exceptional Conditions 



I 



Indication 



Condition 



I 
-+- 



Action 



IKJPARS 
Return code 



f- 



Command incomplete/ 
unable to prompt. 



Set return code 8; 
return to IKJEBEMA. 



IKJPARS 
Return code 



= 8 



Processing interrupt 
by attention. 



ed 



Set return code 0; 
return to IKJEBEMA, 



IKJPARS 
Return code 



= 12 



Invalid parameters. 



Issue message IKJ52313I; 
set return code of 8; 
return to IKJEBEMA. 



IKJPARS 
Return code 



= 16 



No space available. 



Issue message IKJ52312I; 
set return code of 8; 
release PARSE PDL core 
if required/ and return 
to IKJEBEMA. 



H 



IKJEBEUT 
Return code = 4 
when reading last 
record 



IKJEBEUT 
Return code = 8 
after reading last 
record 



Utility data set is 
empty. 



Put out message 
IKJ52501I; set 
return code to 0; set 
* to 0; release PARSE 
PDL storage/ if 
required/ and return to 
IKJEBEMA. 






I/O error in reading 
utility data set. 



Set return code to 12; 
release PARSE PDL 
storage/ if required/ 
and return to IKJEBEMA. 



h 



IKJEBEUT 
Return code = 4 
after reading next 
record 



End of data set. 



Issue message IKJ52500I; 
set * to key of last 
line referenced; turn 
1 the line to be verified 
switch' in comm. 
area on. 
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Table 53. IKJEBEEN Error and Exceptional Conditions 



I 



Indication 



h 



Condition 



Action 



IKJEBEMS 

Return code 8 or 12 

processing. 



Message not put by 
PUTLINE. 



Issue message IKJ52313I, 
continue exit 



H 



IKJEBEMS 
Return code 16 



Message not put by 
PUTLINE. 



Issue message IKJ52312I, 
continue exit 
processing. 



H 



PUTGET 

Return code 16, 20 

or 24 



Prompt not processed 
by PUTGET. 



Issue message IKJ52313I / 
continue exit 
processing. 



PUTGET 

Return code 28 



Prompt not processed 
by PUTGET. 



Issue message IKJ52312I, 
continue exit 
processing. 



f- 



IKJEBESA 
Return code 12 



Return from IKJEBESA 
(SAVE subcommand) . 



Continue exit 
processing. 



IKJSCAN 

Return code not 



Return from IKJSCAN. 



Issue message IKJ52313I, 
continue exit 
processing. 



H 



IKJEBESA 
Return code 8 



Data set not saved. 



Re-issue prompt message 
and continue processing 
based on user response. 
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Table 54. IKJEBEFI Error and Exceptional Conditions 



Indication 



I 



Condition 



Action 



H 

| Unable to prompt for 
| missing operands on 
(command. 



IKJPARS 
Return code 



+ 

| Attention issued 
(during PARSE. 



-+ 



Exit/ return code 8, 



IKJPARS 

Return code = 8 



Exit/ return code 0, 



IKJPARS 

Return code = 12 



(Invalid parms to PARSE 
I 



Issue message IKJ52313I, 
exit/ record code 0. 



+ 

(Not enough core for 
IPARSE. 



IKJPARS 

Return code = 16 



h 



Issue message IKJ52312I, 
exit return code 8. 



IKJEBEUT 
Return code = 4 
on first read 



h 



| Empty utility data 
(set. 



+ 



Issue message IKJ52501I, 
exit return code 0. 



IKJEBEUT 
Return code = 4 
subsequent reads 



| End of data set, 
I 
I 
+ 



Issue message IKJ52506I. 



IKJEBEUT 
Return code 
on any read 



= 8 



| I/O error in reading 
(utility data set. 



H- 



Exit, return code 12. 



IKJEBESE | String not found by 
Return code = 8 | IKJEBESE 
H 



Issue message IKJ52506I, 
exit, return code 0. 



IKJEBESE (I/O error on utility 

Return code = 16 (data set. 

1 



Exit/ return code 12. 
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Table 55. IKJEBEFO Error and Exceptional Conditions (Part 1 of 2) 
i — 



Indication 



Condition 



Action 



IKJPARS 
Return code 



= 4 



Unable to prompt. 



Return to IKJEBEMA with 
return code 8. 



IKJPARS 
Return code 



Attention ECB posted, 



Return to IKJEBEMA with 
return code 0. 



IKJPARS 
Return code = 

I 

IKJPARS 
Return code = 



h 



12 



Invalid PARSE 
parameters. 



Issue message 
return with r 
of 8. 



IKJ52313I; 
eturn code 



16 



Conditional GETMAIN 
failure. 



Issue message 
set return co 
and return to 



IKJ52312I; 
de of 8, 

IKJEBEMA. 



IKJEBEDA 
Return code * 
in allocating 
data set 



8 

a QSAM 



DA fails to allocate 
a QSAM data set. 



Set return co 
release PARSE 
if required a 
to IKJEBEMA. 



de of 8; 

PDL core 
nd return 



H- 



IKJEBEFC 
Return code 



Utility data set 
is empty. 



Issue message 
set return co 
release PARSE 
if required; 
IKJEBEMA. 



IKJ52501I; 
de of 0; 

PDL core 
return to 



H 

I/O error in QSAM 
data set. 



H 



IKJEBEFC 
Return code 



Set return co 
release PARSE 
if required; 
to IKJEBEMA. 



de of 8; 

PDL core 
return 



IKJEBEFC 
Return code 



12 



I/O error in reading 
utility data set. 



Set return code of 12; 
release PARSE PDL core 
if required; return 
to IKJEBEMA. 



h 



+- 



IKJEBEDA 
Return code # 
in unallocati 
data set 

IKJEBEUT 
Return code = 
when reading 
record. 



8 
ng a QSAM 



DA fails to unallocate 
a QSAM data set. 



Set return code of 8; 
release PARSE PDL core 
if required and return 
to IKJEBEMA. 



4 
1st 



Utility data set is 
empty. 



Issue message IKJ52501I 
set return code of zero; 
release PARSE PDL core 
if required; return to 
IKJEBEMA. 
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Table 55. IKJEBEFO Error and Exceptional Conditions (Part 2 of 2) 



Indication 



Condition 



Action 



I 

j Issue message IKJ52504I; 
|set return code of 8; 
| release PARSE PDL core 
| if required; return to 
IIKJEBEMA. 



IIKJEBEUT 

IReturn code = 4 

|when reading current 

| line or following 

| lines. 

F 



Record not found 



IIKJEBEUT 
IReturn code 



I/O error in reading 
utility data set. 



| Set return code of 12; 
| release PARSE PDL core 
| if required; return to 
IIKJEBEMA. 
. + 



IIKJEBECI 
IReturn code 8 



Error in IKJEBECI | Set return code of 8; 
or in FORMAT command. | release PARSE PDL 

Istorage, if required; 

Ireturn to IKJEBEMA. 

i 



(Part 2 of 2) 

Table 56. IKJEBEIP and IKJEBEIM Error and Exceptional Conditions (Part 
1 of 2) 



Indication 



Condition 



Action 



4- 



IKJPARS 

Return code = 16 



No core for PARSE. 



Put out msg. IKJ52312I 
return to IKJEBEMA 
with return code of 8. 



IKJPARS 

Return code = 4 



No-prompt user, 



Return to IKJEBEMA with 
return code of 8. 



IKJPARS 

Return code = 8 



Attention issued in 

PARSE. 



Return to IKJEBEMA 
with return code 0. 



IKJPARS 

Return code = 12 



Invalid PARSE 
parameters . 



Put out msg. IKJ52313I 
return to IKJEBEMA 
with return code of 8. 



IKJPUTL 

Return code =16 



No core for PUTLINE. 



Put out msg IKJ52312I 
return to IKJEBEMA 
with return code of 8. 



IKJPUTL 

Return code = 12 



Invalid parameters 
for PUTLINE. 



Put out msg. IKJ52313I 
return to IKJEBEMA 
with return code of 8. 



IKJPUTL 

Return code = 4 



Attention received 
during PUTLINE. 



Return to IKJEBEMA. 



IKJGETL 

Return code = 24 



No core available for 

GETLINE. 



Put out msg. IKJ52312I 
return to IKJEBEMA 
with return code of 8. 



IKJGETL 

Return code = 8 



Attention received 
during GETLINE. 



Return to IKJEBEMA. 



h 



IKJGETL 

Return code not 0,24, 

4,8 



Internal error in 

GETLINE. 



Put out msg. IKJ52313I 
return to IKJEBEMA 
with return code of 8. 



(Part 1 of 2) 
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Table 56. IKJEBEIP and IKJEBEIM Error and Exceptional Conditions (Part 
2 of 2) 



Indication 



IKJEBELE 
Return code = 4 



Condition 



Input line from 
terminal too long for 
data set. 



I 



Action 



I 






Truncate line and put 
out msg. IKJ52507I. 



IKJEBEUT 
Return code = 



I/O error on 
utility data set. 



Return to IKJEBEMA. 
with return code of 12. 



h 



GETMAIN 

Return code not 

equal 



No core for syntax 
checker buffers. 



Put out msg. IKJ52312I 
and turn off syntax 
checking. 



H 



LANGPRCR 
Return code 



Syntax error in line 
and statement 
completely scanned. 



If msg. pre 
terminal, e 
IPLI or BAS 
IKJEBEMA. 



sent put to 
xcept for 
IC; return to 



H 



LANGPRCR 
Return code 



Syntax error and 
statement not 
completely scanned. 



If msg. pre 
terminal an 
checker to 
SCAN; if IP 
issue msg. 
return to I 
return code 



sent, put to 
d re-call 
complete 
LI or BASIC, 
IKJ52313I; 
KJEBEMA with 
of 8. 



LANGPRCR 

Return code - 20 



Internal error in 
syntax checker. 



Set return 

for IKJEBEM 
to IKJEBEMA 



code of 16 
A and return 



LANGPRCR 

Return code = 16 



No core for syntax 
checker. 



Put out msg 
and return 
with return 



IKJ52312I 
to IKJEBEMA 
code of 8. 
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Table 57. IKJEBEIS Error and Exceptional Conditions 



Indication 



Condition 



Action 



IKJPARS 

Return code =16 



Not enough core for 

PARSE, 



Put out msg. IKJ52312I 
return to IKJEBEMA with 
return code of 8. 



IKJPARS 

Return code = 4 



Unable to prompt. 



Return to IKJEBEMA with 
return code of 8. 



IKJPARS 

Return code = 8 



Attention entered in 
PARSE. 



Return to IKJEBEMA, 
return code 0. 



with 



IKJPARS 

Return code = 12 



Internal error fron 
PARSE. 



Put out msg. IKJ52313I 
return to IKJEBEMA with 
return code of 8. 



h 



IKJEBEUT 
Return code =0 
Key of record = 
Key of record to be 
inserted. 



No room in data set to 
insert line. 



(a) If data set is 
numbered, put out 
IKJ52561I and return to 
IKJEBEMA with 

return code of 8. 

(b) If data set is not 
numbered, make room and 
insert the line, return 
to IKJEBEMA. 



IKJEBELE 
Return code = 4 



Line 
long 
set. 



from term 
to fit in 



inal too 
data 



Truncate line and p 
out msg. IKJ52507I 
return to IKJEBEMA. 



ut 



LANGPRCR 
Return code = 4 



Line 
erro 
comp 



contains 
r and is 
letely sea 



syntax 
nned. 



Return to IKJEBEMA. 
(Set return code of 
if CASCANSW=B» 1> .) 



LANGPRCR 
Return code =8 



Line 
erro 
comp 



contains 
r and is n 
letely sea 



syntax 

ot 

nned. 



Issue message IKJ52313I 
and return to IKJEBEMA 
with return code of 8. 



LANGPRCR 
Return code =16 



Not 
synt 



enough cor 
ax checker 



e for 



Put out msg. IKJ52312I 
return to IKJEBEMA with 
return code of 8. 



LANGPRCR 
Return code =20 



Inte 
synt 



rnal error 
ax checker , 



in 



Set return code of 16 
for IKJEBEMA and return 
control . 



IKJEBEUT 
Return code =8 



I/O error on 
utility data set. 



Return to IKJEBEMA with 
return code of 12. 
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Table 58, IKJEBELI Error and Exceptional Conditions 
i — 



Indication 



Condition 



Action 



PARSE 

Return code = 4 



No prompt user, 



Return to IKJEBEMA with 
return code of 8. 



PARSE 

Return code = 8 



Attention entered. 



Return to IKJEBEMA, 



PARSE 

Return code = 12 



Invalid parameters 
for IKJPARS. 



Issue IKJ52313I 

return to IKJEBEMA with 

return code of 8, 



PARSE 

Return code = 16 



Not enough main 
storage. 



Issue IKJ52312I 

return to IKJEBEMA with 

return code of 8, 



IKJEBELE 
Return code = 4 



Input text length 
greater than LRECL* 



Issue IKJ52507I, 
truncate line and 
continue. 



IKJEBEUT 
Return code = 



I/O error on utility 
data set. 



Post return code 12 
and return to IKJEBEMA, 



IKJEBEUT 

Return code = 12 



Line number too large 
to fit in record. 



Return to IKJEBEMA. 



LANGPRCR 
Return code = 4 



Line contains a 
syntax error and line 
is completely scanned, 



Return to IKJEBEMA. 



LANGPRCR 
Return code 



Line contains a syntax 
error and is not 
completely scanned. 



Issue message IKJ52313I 
and return to IKJEBEMA 
with return code of 8. 



IKJEBEUT 
Return code 



LANGPRCR 

Return code = 20 



Line to be deleted 
does not exist. 



Internal error. 



Issue msg. IKJ52504I, 
| return to IKJEBEMA. 

Set return code 16 
land return to IKJEBEMA, 
+ 



IKJEBEUT 
Return code = 4 
on read first 



h- 



Data set is empty, 



Issue msg. IKJ52501I, 
set current line pointer 
to zero and return to 

IKJEBEMA. 



IKJEBEUT 
Return code = 
on read first 



Deleted line was at 
top of data set. 



Issue msg. IKJ52505I, 
set current line pointer 
to zero and return to 
IKJEBEMA. 



LANGPRCR 
Return code 



16 



Not enough main 
storage for syntax 
checker. 



Issue msg. IKJ52312I, 
return to IKJEBEMA with 
return code of 8. 



430 EDIT 



TSO Command Processor PLM - Vol. 3 (Release 21) 



Table 59. IKJEBELT Error and Exceptional Conditions (Part 1 of 2) 



r — - - - 

| Indication 


-T ■"" 

| Condition 


| Action 


i 
1 


L_ .„ ,-„.. .„ „ . 




|._ - 


_,4. _._ _ ._. - „ „ 


i 


r 




T J 


r ■ _ - 


I 


IIKJPARS 




| PARSE unable to 


|Set return code 8, 




IReturn code 

L 


= 4 


Iprompt . 

, x. „. ..- 


Jreturn to IKJEBEMA. 




r 




t - ■■ — 






IIKJPARS 




| ATTN issued. 


JSet return code 0, 




IReturn code 
I-. „ 


= 8 


,.,! , , , . M .. „. 


Ireturn to IKJEBEMA. 

i L ..._, . „. lt 


i 


r ■ — 




T l 


_^ — ^..^ — — 


l 


IIKJPARS 




| INVALID parameters 


llssue msg. IKJ52313I, 




IReturn code 

L 


= 12 


|sent to PARSE. 

i „ „ _,. 


| set return code 8, 
Ireturn to IKJEBEMA. 




IIKJPARS 




|Not enough core for 


llssue msg. IKJ52312I, 




IReturn code 


= 16 


| PARSING. 

j. „ _,_ „„ _ _ 


| set return code 8, 
Ireturn to IKJEBEMA. 

_.j. , „ „ 


i 






T 


T 


1 


IIKJEBEUT 




| I/O error on utility 


| Release PDL core if 




IReturn code 


= 8 


|data set. 


| PARSE was called, return| 








| to IKJEBEMA with return 








|Data set is empty. 


| code 12. 

llssue msg. IKJ52501I, 


H 


IIKJEBEUT 




IReturn code 


= 4 




| Free PDL if PARSE was 




I after entry 


with 




| called, return to 




loption code 

i 


X« 04' 


,.. JL .. - .- 


| IKJEBEMA with return 
| code 0. 

i ., , , , 


1 


r 




T 


l . ... . 


1 


JCANONUM bit 


in 


|Line no. specified. 


llssue msg. IKJ52502I, 




| communication area is 


| data set not line- 


| free PDL, return to 




|on 

i. .,..,. 




Inumbered. 

_L , _„^_ LJ 


| IKJEBEMA with return 
| code 8. 

_j. ._ ,..— _— ... .«, 


1 


r — 




T 


— r 


1 


Jlinenuml > linenum2 


| Invalid line number 


llssue msg.IKJ52503l, 




L ., . .. ,., 




| range. 

,i,._ , lul .,_, _, ,_ 


| free PDL, return to 
| IKJEBEMA with return 
| code 8. 

„_L„- _. .... ._. .„....,_ 




r 




1 


T 




IIKJEBEUT 




| End of data set 


llssue msg. IKJ52500I 




IReturn code 


= 4 


| encountered. 


| free PDL if PARSE was 




| after entry 


with 




| called, return to 




loption code 

i, , , 


X»02» . 


i ... ..,._ „,„ ^ 


| IKJEBEMA with return 

| code 0. 

i 


1 


j, 




i ■■- ■ 


T 


1 


IIKJEBEUT 




| Specified line not 


llssue msg. IKJ52504I, 




IReturn code 


= 4 


|found, or current line|free PDL, return to 




| after entry 


with 


|not found and * # 0. 


| IKJEBEMA with return 




loption code 


X 1 00' 


i 


| code 8. 


1 






T 


T 


1 


IPUTLINE 




| ATTN issued. 


|Free PDL if PARSE WAS 




IReturn code 

1.,, 


= 4 


i __ _ .„ „ 


| called, return to 
| IKJEBEMA with return 
| code 0. 

, i . 


1 


r 




1 - 


1 ■■ 


\ 


IIKJPUTL 




| Insufficient core for 


llssue msg. IKJ52312I, 




IReturn code 


= 16 


IPUTLINE. 


| free PDL if PARSE was 
| called, return to 
IIKJEMEMA with return 
| code 8. 




L,„. _ _ 




± - ,.. 


..i ._ _ , ... 


1 
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Table 59, IKJEBELT 
i — 



Error and Exceptional Condition (Part 2 of 2) 



"T 

i 

-+ 

flssue msg. IKJ52313I, 
| free PDL if PARSE was 
| called, return to 
IIKJEBEMA with return 
| code 8. 
_+ 



Indication 



Condition 



Action 



IIKJPUTL 
IReturn code 



| Invalid parameters 
12 |sent to PUTLINE. 



IIKJPUTL 
jReturn code 



= 8 



| Output not sent by 
IPUTLINE. 

I 

-j 



llssues msg. IKJ52313I 
land returns to IKJEBEMA 
| with return code of 8. 



(Part 2 of 2) 
Error and Exceptional Conditions (Part 1 of 2) 



Table 60. IKJEBEME 
i 



Indication 

IKJPARS 

return code = 4 
j. 

IKJPARS 

return code = 8 



Condition 
Unable to prompt. 



[ Action 

Set return code to 8; 
return to IKJEBEMA. 



I 



Attention issued, 



Return to IKJEBEMA with 
return code of 0. 



H 



IKJPARS 
return code 



= 12 



Invalid parameters, 



Issue message IKJ52313I; 
set return code to 8; 
return to IKJEBEMA. 



H 



IKJPARS 
return code 



= 16 



No core available, 



Issue message IKJ52312I; 
set return code to 8; 
return to IKJEBEMA 



IKJEBEFC 
return code 



= 4 



Utility data set is 
empty. 



Issue mess 
free data 
PDL core; 
code to 0; 

IKJEBEMA. 



age IKJ52553I; 
set; release 
set return 
return to 



H 



IKJEBEFC 
return code 



QSAM error, 



Free data 
PDL core; 
code to 8; 

IKJEBEMA. 



set; release 
set return 
return to 



IKJEBEFC 
return code 



12 



I/O error on utility 
data set. 



Free data 
PDL core; 
code to 12 
IKJEBEMA. 



set; release 
set return 
return to 



IKJEBECI 
return code = 



Merge unsuccessful. 



Release PDL core; set 
return code to 8; free 
data set; return to 
IKJEBEMA. 



IKJEBECO 
return code = 4 



QSAM data set empty. 



Issue message IKJ52553I, 
delete new utility data 
set; free data set; 
release PDL core, set 
return code to 0; return 
to IKJEBEMA. 
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Table 60. IKJEBEME Error and Exceptional Conditions (Part 2 of 2) 



Indication 



"T- 
I 



Condition 



I 
-+- 



Action 



IIKJEBECO 
Ireturn code 


= 8 


| Unsuccessful copy. 

j. _ ± .„ , 


| Free data set; release | 
| PDL core; set return | 
| code to 8; return to | 
| IKJEBEMA. | 

... i. , .. ,.. ..- . .. . ..j 


IIKJEBEMR 
Ireturn code 

j. 


= 12 


_ .J. _ ,_ u- -- - 

| I/O error in new 
Jutility data set. 


1 ■ - ■■';- - I 

| Free imtermediate QSAM | 
| data set; release PDL | 
(storage; set return | 
| code of 8; return to | 
IIKJEBEMA. | 


IIKJEBEMR 
Ireturn code 


= 8 


| Syntax checker 
|not operational. 

L _ r , _„ 


| Release PDL core; | 
Ireturn code to 16 | 
| return to IKJEBEMA. | 
i _,. ...„ _ .__ j 


r 

IIKJEBEMR 
Ireturn code 

L 


= 4 


T " 

| Unsuccessful 
Iretranslation . 


T 1 

IRelease PDL core; | 
| RC to 0; return | 
| to IKJEBEMA. | 

4. 4 


JIKJPTGT 
Ireturn code 

L 


= 8 


|Attention issued. 

,., L_. „_ ,„. . 


T i 

IRelease PDL core; set | 
Ireturn code to 0; return| 
|to IKJEBEMA. | 

_. 1. ,. „ „ i 


IIKJPTGT 
Ireturn code 

L 


= 12 


r 

| Second level message 
Ipresent. 

i „.. , 


1 ■■■ l 

|Set ECTMSGF switch on; | 
Ire-issue PUTGET. j 


JIKJPTGT 
Ireturn code 


= 16 


JNOWAIT for TPUT and 
|no line found. 


T 1 

| Issue message IKJ52313I;| 
| release PDL core; set | 
Ireturn code to 8; return| 
| to IKJEBEMA. | 
j. „.„ ,„_„ _ „ „_ . j 


IIKJPTGT 
Ireturn code 


= 20 


— f- - - 

JNOWAIT for TGET and 
Jno line found. 


t — — — — 1 

| Same as return code 16 | 
| from PUTGET. | 


IIKJPTGT 
Ireturn code 


= 24 


f. — „. — ... 

| Invalid parameters. 

.„„ j._ «., _ u 


| Same as return code 16 | 
| from PUTGET. | 

x .« . ■ ,- , „,. 1 


IIKJPTGT 
Ireturn code 


= 28 


i 

|No core available. 

„,.j , 


T I 

| Issue message IKJ52312I;| 
| release PDL core; set | 
Ireturn code to 8; return| 
| to IKJEBEMA. | 

X J 


JIKJEBEUT 
Ireturn code 

j 


= 4 


T 

| Record not found. 

L .... _ 


T 1 

| Convert relative record | 
| number to decimal; | 
| continue processing. | 

. i , , „ i 


JIKJEBEUT 
(return code 

L , 


= 8 


r — 

I I/O error on utility 
(data set. 

,,, i L „ , 


r ■ l 
IRelease PDL core; set | 
Jreturn code to 12; | 
freturn to IKJEBEMA. | 

„ l , , ,. _,„.! , - .1 


JIKJEBEDA 
jreturn code 


= 8 


IIKJDAIR not 
jsuccessful . 


1 -■'■ ' l 

(Release PDL core; set | 
Jreturn code to 8; return! 
|to IKJEBEMA. | 
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Table 61. IKJEBEEE 



Error and Exceptional Conditions 
1 



I 



Indication 



Condition 



Action 



IKJPARS 

Return code = 4 



Unable to prompt for 
missing operand. 



Exit , return code 



IKJPARS 

return code = 8 



Attention issued. 



Exit , return code 0, 



IKJPARS 

return code = 12 



Invalid parms to 
PARSE. 



Issue msg. IKJ52313I 
exit, return code 8. 



IKJPARS 

return code = 16 



Not enough core for 
PARSE. 



Issue msg. IKJ52312I 
exit, return code 8. 



IKJEBEUI 
return code # 

IKJEBEUT 
return code = 4 
read first red 



Unable to allocate new 
utility data set. 



Release PARSE PDL if 
present and exit, 
return code 8. 



Empty data set. 









Issue msg. IKJ52501I 
exit, return code 



IKJEBEUT 
return code 

IKJEBEUT 
return code 



1/0 error on utility 
data set. 



Unall 

data 

code 



ocate new 
set, exit, 
12. 



utility 
return 



12 



Invalid line number. 



Unall 

data 

code 



ocate new 
set, exit, 



utility 
return 



IKJEBERN 
return code = 4 



BASIC RENUM 
unsuccessful. 



Unall 

data 

code 



ocate new 
set, exit, 



utility 
return 



IKJEBERN 
return code = 8 



I/O error in new 
utility data set. 



Unall 

data 

retur 



ocate new 
set; exit 
n code of 



utility 

with 

12. 



CANONUM = 1; 
user specified 
"old line number". 



h 



Data set is not 
line-numbered. 



Issue 
exit 
of 8. 



message I 
with retur 



KJ52502I; 
n code 



IKJEBEMR 
return code = 4 



BASIC/IPLI RENUM 
unsuccessful in 
reconstructing Polish 
data set. 



Unallocate new utility 
DCB; set return code of 
8 and return to 
IKJEBEMA. 



IKJEBEMR 
return code = 



H 



BASIC/IPLI syntax 
checker not 
operational. 



Set return code of 16 
and return to IKJEBEMA. 



IKJEBEUT 
return code = 4 
on reading 
"old line number" 



Line not found on 
read. 



Msg. IKJ52504I; 
exit, after unallocating 
new utility data set, 
set return code of 8. 
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Table 62. IKJEBERU Error and Exceptional Conditions (Part 1 of 2) 
r t 



Indication 



Condition 



Action 



I 

IIKJPARS 






+ 

| Unable to prompt for 


-+ 

|Exit, return code 8. 


H 


IReturn code 

L _ _ 


= 


4 


Imissing operand. 

„ _L .,_ „.. _._ _ „ 






1 

IIKJPARS 






T * 

| Attention issued. 


|Exit, return code 0. 




IReturn code 
i— - 


= 


8 


„. i „. ^ ,„. „_ m _ , „ ^ 




i 


I 

IIKJPARS 






I 

| Invalid parms to 


| Issue msg. IKJ52313I 


i 


IReturn code 


= 


12 


IPARSE. 

j. ■ „. 


| exit , return code 8. 

— J_ _. __ ^ .„. . „, *. _l_ _u 


i 


IIKJPARS 






T — — "" 

|Not enough core for 


t 

llssue, msg. IKJ52312I 


I 


IReturn code 

i . , . ,, „ „ 


= 


16 


IPARSE. 

i„ , „ , . 


| exit , return code 8. 




I 

IIKJEBEUT 






1 ■ ■ 

| Empty GOFORT dataset. 


Ilssue msg. IKJ52501I 




IReturn code 


= 


4 




| exit , return code = 0. 




|on first read 

L„„_ 






4. 




IIKJEBEUT 






| I/O error on utility 


T 

| Exit , return code 12 




IReturn code 


= 


8 


|ds for GOFORT. 


Ifreemain core for 




|on any read 






„ L „, _„ ._ 


| dataset . 

x — „, , „.. ,.-..- - ,,. _^ 




IIKJEBEDA 






T ~ 

| Unable to allocate 


1 — ■■■ ■ " ■ ■ 
|Exit, return code 8. 




IReturn code 


= 


8 


|RUN ds. 


x _ _ ... _„ rT _ _ _ , 




r — — — 
| IKJEBEFC 






"T -- — -"- - -- 

| Empty dataset. 


1 "- ■ - - ■ 

|Exit, return code = 




IReturn code 
| IKJEBEFC 


= 


4 


| I/O error on utility 


lafter msg. IKJ52501I 
|Exit, return code 12 


H 






IReturn code 

L .„ ._ _. _ 




8 


Ids . 

i, , 


lafter link to IKJEBEDA 
| to unallocate RUN 
| dataset . 




r 

IIKJEBEDA 






r 

| Unable to unallocate 


| Exit, return code 8 




IReturn code 







|RUN dataset. 


| (note: if return code 8 

| was returned from 

| IKJEBEFC return code 

| from IKJEBERU is 12 in 

| any case, no matter 

|what return code 

| comes from IKJEEEDA.) 
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Table 62. IKJEBERU Error and Exceptional 



Conditions (Part 2 of 2) 

, 



Indication 



I 



Condition 



Action 



STACK 

Return code = 4 



Invalid parms to 
PARSE. 



[Issue msg. IKJ52313I 
land exit, return code 8. 
. + _ 



IKJEBECI 
Return code = 
(GOFORT data set) 



Error in IKJEBECI 
or in attached 
command. 



| Delete data set fron 
I STACK and exit, 
jreturn code 8. 



LANGPRCR 
Return code = 4 
BASIC or IPLI 



Error in LANGPRCR. 



(Return to IKJEBEMA with 
jreturn code 8. 



-4 



H 



LANGPRCR 

Return code = 8 or 



Error in LANGPRCR, 



12 



| Issue message IKJ52313I; 
| Return to IKJEBEMA with 
I return code 8. 



| LANGPRCR 
Return code = 16 



Insufficient 
storage. 



I- 

IIKJEBECI 

| Return code = 8 

| (Data set is not 

IGOFORT) 



Issue message IKJ52312I; 
Return to IKJEBEMA with 
return code 8. 



Error in IKJEBECI 
or in an attached 
command. 



| Return with return code 
I of 8. 



I 

-A- 
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Table 63. IKJEBESA Error and Exceptional Conditions (Part 1 of 5) 



Indication 



I 

h 

IKJPARS 

Return code 

IKJPARS 
Return code 
F 



Condition 



I 



Action 



IKJPARS unable to 
prompt. 

ATTN issued during 
PARSING. 



Set return code 8, 
return to caller. 

Set return code 0, 
return to caller. 






IKJPARS 
Return code 



12 



Invalid parameter sent 
to IKJPARS. 



Issue message IKJ52313I, 
Set return code 8 / 
return to caller. 



IKJPARS 
Return code 



= 16 



Not enough core fc 
PARSING. 



Issue msg. IKJ52312I 
set return code 8, 
return to caller. 



IKJDFLT 
Return code 



Length of dsname 
becomes > 44 
characters when it is 
fully- qualified. 



Issue msg. IKJ52310I, 
set return code 8, 
return to caller. 



IKJDFLT 

Return code = 4 



IKJDFLT 
Return code 

IKJDFLT 
Return code 



= 28 



32 



Prompting error ir 
IKJDFLT. 

Invalid parameters 
sent to IKJDFLT. 



IKJDFLT required 
prompting. 



— +■ 



Issue msg. 
set return 
return to 

Issue msg. 
set return 
return to 

Issue msg. 
set return 
return to 



IKJ52313I, 
code 8, 
caller. 

IKJ52313I, 
code 8, 
caller. 

IKJ52313I, 
code 8, 
caller. 



IKJDFLT 
Return code 



= 12 



Catalog I/O error, 
dsname syntax error, 
or unavailable catalog 
data set, in IKJDFLT. 



Msg. issue 
IKJDFLT; I 
sets retur 
returns to 



d by 
KJEBESA 
n code and 
caller. 



IKJDFLT 

Return code = 16 



Data set exists a 
another index lev 



t 

el. 



Issue msg. 
set return 
return to 



IKJ52316I, 
code 8, 
caller. 



IKJDFLT 

Return code = 24 



ATTN issued during 
defaulting of dsname. 



Set return 
return to 



code 0; 
caller. 



t- 



SAVE dsname = EDIT 
dsname. member name 
specified on SAVE but 
not on EDIT 



Extraneous member 
specified. 



name 



Issue msg 
proceed as 
operands w 
on subcomm 



IKJ52311I, 

if no 
ere entered 
and. 



H 



IKJDAIR 

Return code = 4 



Invalid parameters 
sent to IKJDAIR. 



Issue msg. IKJ52313I, 
unallocate data set if 
necessary, set return 
code 8; return to 
caller. 



IKJDAIR 
Return code 



= 16 



No TIOT entries 
available for 
allocation. 



Issue msg. IKJ52301I, 
set return code 8, 
return to caller. 
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Table 63. IKJEBESA Error and Exceptional Conditions (Part 2 of 5) 



r — 


— T -- — ~ " ™ T 


_, 1 


j Indication 
1IKJDAIR 


| Condition | Action | 


ICatalog management | Issue msg. 


IKJ52302I / J 


jReturn code = 8 


| error after IKJDAIR is|set return 


code 8, J 


ICatalog return code 


Icalled to allocate a Jreturn to 


caller. | 


| (CTRC) = X f 04' 
IIKJDAIR 


Jdata set as new, I 

ICatalog management | Issue msg. 


IKJ52306I, J 


jReturn code = 8 


| error after IKJDAIR is | set return 


code 8, | 


ICatalog return code 


Icalled to allocate a Jreturn to 


caller. J 


jCTRC = X» 14» 


| data set as new. | 


i 


IIKJDAIR 


ICatalog management | Issue message IKJM339I, | 


[Return code = 8 


| error after IKJDAIR is | use PUTGET 


to issue msg. | 


ICatalog return code 


Icalled to allocate a JIKJ52340A 


and get user J 


|CTRC = none of above. 


|data set as new. |input. 




| (IKJDFLT was 






| not called) 


L . , „ l 


j 


IIKJDAIR 


t — r~ - ■■ — 
| Data set not allocated | Issue msg. 


IKJ52304I; J 


IReturn code = 8 


| as new; data set |set return 


code of 8; | 


| CTRC = none of above 

i _ 


Jname not in catalog. | return to 

j_ ,.,. ... T . . „ , , i ._ 


caller. J 

1 


1 


— r — — — r 


l 


IIKJDAIR 


IDynamic allocation 1 Issue msg. 


IKJ52302I / | 


JReturn code = 12 


| error after IKJDAIR is | set return 


code 8, J 


IDynamic allocation 


Jcalled to allocate a Jreturn to 


caller. | 


JReturn code 


| data set as new. J 




| (DARC) = X^TOS' 






1- — 


i i 




r . 


T T ~ 




IIKJDAIR 


IDynamic allocation J Issue msg. 


IKJ52312I, J 


IReturn code = 12 


|error after IKJDAIR isjset return 


code 8 , | 


IDynamic allocation 


Icalled to allocate a | return to 


caller. | 


JReturn code 


| data set as new. | 




JDARC = X'0204' 


In ., 1 




IIKJDAIR 


IDynamic allocation | Issue msg. 


IKJ52318I, | 


JReturn code = 12 


| error after IKJDAIR is | set return 


code 8, | 


JDynamic allocation 


Icalled to allocate a Ireturn to 


caller. | 


JReturn code 


|data set as new. | 




JDARC = X' 0214* 

L 


i i 




IIKJDAIR 


T T 

IDynamic allocation | Issue msg. 


IKJ52318I, | 


JReturn code = 12 


Jerror after IKJDAIR isjset return 


code 8, | 


JDynamic allocation 


Jcalled to allocate a Jreturn to 


caller. | 


IReturn code 


jdata set as new. J 




|DARC = X'021C 

L 


-J- X 




IIKJDAIR 


— r T 

IDynamic allocation | Issue msg. 


IKJ52306I, | 


IReturn code = 12 


Jerror after IKJDAIR isjset return 


code 8, | 


{Dynamic allocation 


Jcalled to allocate a Jreturn to 


caller. | 


IReturn code 


|data set as new. J 




|DARC = X , 0210» 

L _ ,,„.._ - ,, .. 


i, . . . , , , i 




IIKJDAIR 


i |- ■■ - ■■- 

JDynamic allocation | Issue msg. 


IKJ52303I, | 


IReturn code = 12 


|error after IKJDAIR isjset return 


code 8, | 


IDynamic allocation 


Jcalled to allocate a Jreturn to 


caller. J 


jReturn code 


Jdata set as new. J 




JDARC = X'0218 f 
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Table 63. IKJEBESA Error and Exceptional Conditions (Part 3 of 5) 



r 

| Indication 


i — i 

| Conditions 

. .. ..L ^ r . T ..., . ^ ,.,.---- - __ J 


■' ■■ ■ ■ ■ ■ ■■ — 

Action 


1 
i 




T 1 




1 


IIKJDAIR 


IDynamic allocation 


Issue msg. IKJ52317I, 




JReturn code = 12 


jerror after IKJDAIR is 


set return code 8, 




| Dynamic allocation 


| called to allocate a 


return to caller. 




(Return code 


|data set as new. 






|DARC = X f 0404» 

i JP ... . . 


.._.,!_ -,„.- .. _. _ _ .^. . 




j 


l ■ ■ ■ — 


t 




1 


IIKJDAIR 


IDynamic allocation 


Issue msg. IKJ52314I, 




IReturn code = 12 


| error after IKJDAIR is 


set return code 8, 




IDynamic allocation 


| called to allocate a 


return to caller. 




IReturn code 


|data set as new. 






IDARC = X'041C« 


„, _L , _._ . „ __ ..... . ,„ „ . 


L „ .. _. „._ 


j 




T " 


'■ 


* 1 


IIKJDAIR 


| Data set not allocated 


Issue message IKJM339I, 




JReturn code = 12, 


I as new, no member name 


use PUTGET to issue 




| no error message 


| specified. 


msg. IKJ52340A and get 




| exists which 




user input. 




(corresponds to the 








Isetting of the 








IDARC field 








| (IKJDFLT was 








|not called.) 
IIKJDAIR 


| Data set not allocated 




H 


Issue msg. IKJ52304I; 


IReturn code = 12 


| as new; data set 


set return code of 8; 




|DARC = none of above 


| name not in catalog 


return to caller. 




| (IKJDFLT was called.) 


i ■ - 




■I 


JIKJPTGT 


T 

| ATTN issued during 


Set return code 0, 


1 


IReturn code = 8 


IPUTGET. 
. X -I 


return to caller. 


J 




T 1 


r - - ■■ ■ 


1 


JIKJPTGT 


IPUTGET unable to 


Unallocate data set 




IReturn code = 12 


Iprompt . 

i , ... 


if necessary, 

set return code 0, 

return to caller. 

L „ ,. ™ __, 


1 




t 1 


r 


I 


IIKJPTGT 


JPUTGET unable to send 


Issue msg. IKJ52313I, 




IReturn code = 16 


Imessage. 


unallocate data set 
if necessary, 
set return code 0, 
return to caller. 






... L... r _ ,_ , I 


, 


1 


IIKJPTGT 


— j. _. — — ■ " i 

JPUTGET unable to 


Issue msg. IKJ52313I, 


1 


IReturn code = 20 


lobtain user input. 

„, i ,„ - - „ 


unallocate data set 
if necessary, 
set return code 0, 
return to caller. 


1 




..j. _ 


' 


1 


IIKJPTGT 


| Invalid parameters 


Issue msg. IKJ52313I, 




IReturn code = 24 


Jsent to PUTGET. 


unallocate data set 
if necessary 
set return code 0, 
return to caller. 
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Table 63. IKJEBE 
i — 



Indication 



SA Error and Exceptional Conditions (Part 4 of 5) 
1 



H 



Conditions 



Action 



IKJPTGT 

Return code = 28 



Insufficient core 
for PUTGET. 



Issue msg. IKJ52312I, 
unallocate data set 
if necessary, 
set return code 0, 
return to caller. 



IKJDAIR 

Return code 8 or 



12 



Catalog management or 
dynamic allocation 
error after calling 
IKJDAIR to allocate an 
old data set. 



Issue messa 
described a 
error durin 
as new. If 
corresponds 
or DARC set 
message IKJ 
return code 
return to c 



ge as 
bove for 
g allocation 
no message 

to the CTRC 
ting, issue 
523041. Set 

8, 
aller . 



h 



DA08DSO field in DAIR 
parameter block 
indicates partitioned 
organization 



IKJDAIR was called to 
allocate an old 
sequential data set; 
allocation successful, 
but DSORG = PO. 



Unall 
conti 
a par 
using 
membe 



ocate 
nue pr 
tition 
•TEMP 
r name 



data set, 
ocessing as 
ed data set, 
NAME 1 as 



DA08DSO field in DAIR 
parameter block is 
non-zero, but does not 
indicate partitioned 
or sequential 
organization 



An old data set is 
allocated, and DSORG 
is set but is not PS 
and not PO . 



Issue message IKJ52330I, 
unallocate data set, 
set return code 8, 
return to caller. 



H 



IKJDAIR 

Return code 8 or 

entry code X' 18 f 



12 



Catalog management or 
dynamic allocation 
error during 
unallocation of data 
set. 



Issue message IKJ52424I, 
Issue 'SAVED' mode 
message if IKJEBEFC 
copied records into 
the data set, 
set return code 8, 
return to caller. 



h 

1DA08DSO field in DAIR 
parameter block 
indicates sequential 
organization 



H 



IKJDAIR was ca 
allocate an ol 
partitioned da 
allocation sue 
but DSORG = PS 



lied to 

d 

ta set; 

cessful, 



Issue message IKJ52311I, 
unallocate data set, 
continue processing 
data set as sequential. 



DEVTYPE sve 
Non-zero return code 



Unable to obta 
track length o 
device . 



in 

f output 



Issue message IKJ52313I, 
unallocate data set, 
set return code 8, 
return to caller. 



Blocksize greater than 
device track length 



EDIT blocksize 
large. 



too 



Issue message IKJ52554I, 
unallocate data set, 
set return code 8, 
return to caller. 



OBTAIN sve 
Non-zero return 



code 



Unable to read 
into core. 



DSCB 



Issue message IKJ52313, 
unallocate data set, 
return code to 8, 
return to caller. 



(Part 4 of 5) 
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Table 63. IKJEBESA Error and Exceptional Conditions (Part 5 of 5) 
i 1 1 



| Indication 

i , , . 




| Conditions 

_.L ,_.„--. 


| Action | 
i i 


i 




f - ■ .-.-a..- T - - ■— '■■- " - - i 


|In the DS1RECFM f 


ield 


|A PDS has standard 


Issue message IKJ52331I,| 


|of the DSCB, the 


"S" 


| blocks", or spanned 


[unallocate data set, | 


|-bit is on. 




Irecords. 


set return code 8, | 


J , -, r. - 




1 

i 


[return to caller. | 


1 

|SAVE data set is 


a 


T 

| SAVE data set is 


Issue msg. IKJ52552I, | 


|PDS, and its record 


| incompatible with 


| unallocate data set, | 


Iformat, blocksize 


, or 


| utility data set. 


set return code 8, | 


| logical record le 


ngth 


1 


[return to caller. | 


|is not compatible 


with| 




jthat of the utili 


ty 


1 




|data set. 

i , . „. 




1 

1 • ... , , .. 




i 

|BLDL svc 




| I/O error on SAVE data 


[Issue msg. IKJ52313I, | 


(return code = 8 

i ., , , , . , 




| set. 
1 

1 

i , L 


[unallocate data set, j 

set return code 8, | 

[return to caller. | 


* — 




■I 




|BLDL 




| The specified member 


Issue message IKJ52339I,| 


| Return code = 




|in the SAVE data set 


[use PUTGET to issue j 






lexists, and the SAVE 


msg. IKJ52341A and get | 






Jdsname and member are 


[user input. | 






Jnot both the same as 








|the EDIT dsname and 








| member . 

l... _ _ ,„ _ , . 




|BLDL 




— r i 
|The specified member 


| Issue message IKJ52339I,| 


IReturn code = 




Jin the SAVE data set 


use PUTGET to issue | 






| exists, the SAVE and 


| msg. IKJ52341A and get | 






JEDIT dsnames 8 member 


user input. | 






| names are identical / 








land NEW was specified 








|on the EDIT command. 




J 




L . „ 


L __ _. • .„ ,, ,.„ J 


i 




I ■ 


r 1 


IIKJEBEFC 




| Utility data set is 


| Issue msg. IKJ52553I, | 


IReturn code = 4 




| empty. 

1 

1 

1 


I unallocate data set | 
if necessary, | 

|set return code 0, | 
return to caller. | 


IIKJEBEFC 




i 1 

IQSAM error in copying 


[Unallocate data set j 


IReturn code = 8 




Irecords from utility 


if necessary, | 






| to SAVE data set. 


[set return code 8, | 


i 1JJ1 _ M , __ „. , ±1 




I 

L .. .,. . ...,, 


return to caller. | 


IIKJEBEFC 




T A 

| I/O error on utility 


| Unallocate data set | 


JReturn code = 12 




| data set. 

I 

1 


if necessary , | 

[set return code 12, | 

return to caller. j 
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Table 64. IKJEBESC, IKJEBESN Error and Exceptional Conditions (Part 1 
of 3) 



Indication 



Condition 



Action 



CASCAN switch in 
processor data 
table is off. 



I- 



Syntax checking is 
invalid for data set 
type. 



Issue msg. IKJ52363I, 
set return code 0, 
return to IKJEBEMA. 



Syntax checker name 
(CASYNAME) in 
processor data 
table is set to 
X» 000 00000000 000 • or 
X ' FFFFFFFFFFFFFFFF • . 



Syntax checker is not 
in system or is not 
operational. 



Issue msg.IKJ52364I 
set return code 12, 
if input source is an 
in-storage procedure; 
otherwise, clear input 
queue, set return code 
of 0, and return to 
IKJEBEMA. 



IKJPARS 

Return code = 12. 



Invalid parameters 
sent to IKJPARS. 



Issue msg.IKJ52313I, 
set return code 8, 
return to caller. 



IKJPARS 

return code = 16 



Insufficient core for 
parsing. 






IKJPARS 
return code 8. 



Attention issued. 



Issue msg. IKJ52312I, 
set return code 8, 
return to caller. 

Return to caller with 
return code 0. 



IKJPARS 

Return code = 4, 



Unable to prompt. 



Return to caller with 
code 8. 



Syntax checker 
return code = 20 
to IKJEBESN 



Syntax checker has 
become inoperative. 



Set return code 16 and 
return to IKJEBEMA. 



Syntax checker 
Non-zero return code 



Syntax checker 
unsuccessful on an 
initial entry. 



IKJEBEUT 
Return code 
to IKJEBESC 



I/O error in utility 
data set. 



-+ 



Call syntax checker for 
final entry, delete 
syntax checker, set 
pointer to checker 
(CAPTCHK) to 0; set 
syntax checker name to 
X 'FFFFFFFFFFFFFFFF ' to 
indicate checker not 
operative, turn off scan 
S prompt switches 
(CASCANSW & CAPROMPT) , 
set return code 16, turn 
on syntax checker 
recovery bit (CASCRC20) 
so that controller 
will turn it off, and 
return to IKJEBEMA. 

Turn off input bit 
(INPUTCD) in options 
word, release PDL core 
if necessary, return to 
IKJEBEMA with return 
code 12. 



(Part 1 of 3) 
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Table 64. IKJEBESC, IKJEBESN Error and Exceptional Conditions (Part 2 
of 3) 



| Indication 

CANONUM switch in 
communication area 
is on. 



CASCRC20 bit in 
communication area is 
on, and checker is 
again operational. 



— r 

| Condition 

| Line number speci 
| but data set not 
I numbered. 



r 1 

| Action | 



Syntax 

during 

but was 

deleted 

and re 

initial 

line-tr 

run-tim 

require 



checker fa 
line-scann 

successfu 

re-loade 

called for 

entry (an 
anslation # 
e data set 
d) • 



fied,|Issue msg. IKJ52502I , 
line-| release PDL core if 
necessary, return to 
IKJEBEMA with return 
code 

iled | Turn off CASCRC20 bit, 
ing, |issue msg. IKJ52367I , 
lly | release PDL core if 
d, | necessary, and return to 

IKJEBEMA with return 

code 0. 



d for 
if a 
is 



H 



GETMAIN SVC 
Non-zero return code 



Unable to obtain 
buffer to send lines 
for syntax-checking. 



Issue msg.IKJ52312I, 
delete syntax checker if 
a run-time data set is 
not required, and if 
input scanning is not 
in effect, free PDL 
return to IKJEBEMA with 
return code 0. 



h 



IKJEBEUT 

Return code = 4 

with entry code X'04' 



Empty data set. 



Issue m 
free bu 
'SCAN/N 
options 
if nece 
delete 
it does 
run-tim 
and if 
is not 
return 
with re 



sg.IKJ52501I 
ffer reset 
OSCAN' bit i 

word, free 
ssary , 

syntax check 
n"t keep a 
e data set, 
input scanni 
in effect, 
to IKJEBEMA 
turn code 



n 
PDL 

er if 



ng 



Iinenum1>linenum2 



Invalid line no, 
range specified. 



Issue msg.IKJ52503I, 
continue as when data 
set is empty, return 
with code of 8. 



f- 



IKJEBEUT 
Return code = 8 
to IKJEBESN 



I/O error on utility 
data set. 



Free buffer, reset 
1 SCAN/NOSCAN 1 bit in 
options word, free PDL 
if necessary, delete 
syntax checker unless it 
keeps a run-time data 
set or if input scanning 
is not in effect, 
return to IKJEBEMA 
return code 12. 



with 
(Part 2 of 3) 



Section 6: Diagnostic Aids 443 



Table 64. IKJEBESC, IKJEBESN Error and Exceptional Conditions (Part 3 
of 3) 



I 



Indication 



Condition 



Action 



Syntax checker 
Return code = E 



Syntax error found, 
syntax checker has 
completed scanning 
whole buffer. 



not 
the 



Call IKJEBEMS t 
error msg. unle 
checker has sen 
(msg pointer=0) 
Recall syntax c 
to continue sea 
unless ATTN has 
issued. 



o send 

ss syntaxj 

t it 

hecker 

nning, 

been 



Syntax checker 
Return code = 4 



Syntax error found, 
syntax checker has 
completed scanning 
buffer. 



Proceed as for syntax 
checker return code 8, 
except re-call syntax 
checker only if more 
lines remain to be 
syntax- checked. 



Syntax checker 
return code = 12 



Last statement in 
buffer may be 
incomplete. 



If no lines rem 
syntax- checked , 
syntax-checker 
diagnose the la 
statement. Othe 
chain a new buf 
the last one, o 
new buffer chai 
recall syntax-c 
continue scanni 
on 'INCOMPST 1 b 
syntax checker 
to indicate tha 
entry follows a 
code 12) . 



ain to be| 

recall 
to 

St 

rwise 
f er to 
r send a 
n, and 
hecker to| 
ng (turn 
it in 
work area | 
t this 
return 



444 EDIT 



TSO Command Processor PLM - Vol. 3 (Release 21) 



Table 65. IKJEBETA Error and Exceptional Conditions 



I 



Indication 



I 



Condition 



Action 



| IIKJPARS 
| Return code 
j. 



1 Unable to prompt for 
| missing operands. 
+ 



exit , return code 8. 



IIKJPARS 

| Return code = 8 



| Attention issued 
[during PARSE. 



Exit , return code 0, 



H~ 



IIKJPARS 
| |Return code = 12 



[Invalid parms to 
IPARSE. 



Issue msg. IKJ52313I, 
exit, return code 8. 



IIKJPARS 

| Return code = 16 



| Not enough core for 
IPARSE. 
H 



Issue msg. IKJ52312I, 
Exit, return code 8. 



IGETLINE 

I Return code = 



| Attention issued. 



Exit, return code 0. 



IGETLINE 
IReturn code 



12 



INOWAIT spec, no input 
jreturned . 



Issue msg. IKJ52313I, 
exit, return code 8. 



IGETLINE 

IReturn code =? 16 



| End of data or 
Iprocedure input, 



Re-issue GETLINE. 



IGETLINE 

IReturn code = 20 



| Invalid parms to 
IGETLINE 
+ 



Issue msg. IKJ52313I, 
exit, return code 8. 



IGETLINE 

IReturn code = 24 



L 



| Not enough core for 

IGETLINE. 

_JL 



Issue msg. IKJ52312I, 
exit, return code 8. 



Table 66. IKJEBETO Error and Exceptional Conditions 

i 

| Indication | Condition 



Action 



IReturn code of 8 f rom | 
IKJEBEUT 



I/O error in reading 
utility data set 



Set return code of 12; 
return to IKJEBEMA. 



JReturn code of 4 f rom | 

| IKJEBEUT 



Utility data set is 
empty 



Set return code of 0; 
set * to zero; issue 
message IKJ52501I, 
return to IKJEBEMA. 
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Table 67. IKJEBEUP Error and Exceptional Conditions 
r — 



Indication 



I 



Condition 



Action 



IKJPARS 
Return code 



Command incomplete 
unable to prompt. 



Set return code of 8; 
return to IKJEBEMA. 



IKJPARS 

Return code = 8 



Processing interrupted 
by attention; 
communications ECB 
posted . 



Set return code of 0; 
and return to IKJEBEMA. 



H 



IKJPARS 

Return code = 12 



Invalid parameters 
passed to IKJPARS. 



Issue message IKJ52313I, 
set return code of 8; 
return to IKJEBEMA. 



-4 



IKJPARS 

Return code = 16 



No space available. 



Issue message IKJ52312I 
set return code of 8; 
return to IKJEBEMA. 



-4 



IKJEBEUT 
Return code = 4 
after reading 1st 
record 



Utility data set is 
empty. 



Issue message IKJ5250 1I, 
set return code of 0; 
set * to 8; release 
PARSE PDL core if 
required and return to 
IKJEBEMA. 



H 



IKJEBEUT 
Return code 



h 



I/O error in reading 
utility data set. 



Set return code fo 12; 
release PARSE PDL core 
if required and return 
to IKJEBEMA. 



H 



IKJEBEUT 
Return code = 4 
When reading reco 
previous to curre 
record. 



rds 
nt 



The number of records 
current record is less 
than "count". 



Issue message IKJ52505I; 
set * to key of last 
line referenced; turn 
CALNTOVF to 1 . 



Table 68. IKJEBEVE Error and Exceptional Conditions 
i — 



Indication 



h 



Condition 



Action 



| IIKJPARS 

j Return code = 4 



Unable to prompt, 



| Set return code to 8; 
| return to IKJEBEMA. 



IIKJPARS 

| Return code 



Attention issued. 



| Set return code to 0; 
| return to IKJEBEMA. 



. + . 

| Put out message 
IIKJ52313I; set return 
| code to 8; return to 
| IKJEBEMA. 



I i 



IIKJPARS 

| Return code 



= 12 



Invalid parameters. 



IIKJPARS 

| Return code 



16 



No core available. 



| Put out message 
IIKJ52312I; set return 
| code to 8; return to 
| IKJEBEMA. 
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Table 69. IKJEBEUI Error and Exceptional conditions 
r — 



Indication 



I- 



Condition 



Action 



GETMAIN 

Nonzero return code 

Test DCBOFLGS 
after OPEN 



Getmain for workarea 
and buffers 
unsuccessful . 



4— 



OPEN of utility data 
set not successful. 



Issue message IKJ52312I 
and terminate, return 
code 4. 

Issue message IKJ52309I, 
unallocate utility data 
set, free dynamic core, 
and terminate, return 
code 12. 



DAIR 

Nonzero return code 



Utility data set 
not allocated. 



Issue message as 
described below. Free 
dynamic core and 
terminate, return code 



h 



DAIR 

Return code = 8 

CTRC field = X'0028' 



Catalog I/O error, 



Issue IKJ52304I, 



DAIR 

Return code = 8 

CTRC field not X'0028' 



Catalog management 
error 



Issue IKJ52304I 
with CTRC field, 



h 



DAIR 

Return code = 12 

DARC field = X' 0220' 



Insufficient direct- 
access space 
available. 



Issue IKJ52305I. 



DAIR 

Return code = 12 

DARC field = X'021C 



No unit available 
for allocation 



Issue IKJ52318I. 



DAIR 

Return code 
DARC field = 



= 12 
X'0214» 



Invalid unit in user 
attributes data set. 



Issue IKJ52318I. 



DAIR 

Return code = 12 

and anything else in 

DARC 



Other dynamic 
allocation error, 



Issue IKJ52304I 
with DARC field. 



Table 70. IKJEBEEX Error and Exceptional Conditions 

Indication | Condition | 

— + 



Action 



|DAIR 
Nonzero return code 



Utility data set 
unallocation not 
successful . 



| If return code is 12 
| decimal, issue message 
IIKJ52424I. For any 
| other nonzero return 
| code issue message 
JIKJ52 313I, continue 
| processing in either 
| case. 
.j 
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Ta 
i — 



ble 71. IKJEBEUT Error and Exceptional Conditions 
1 



Indication 



Condition 



I 



Action 



|a 

|R 



ccess method 
eturn code = 4 



| Record not found. 
I 



Return with return 
code 4. 



la 

IR 
It 

I— 
|L 
|o 
|c 
|L 
|c 
|e 



ccess method 
eturn code greater 
han 4 



| I/O error. 

I 

I 



ine number length JLine number limit 
btained from field of [exceeded in WRITE 
ommunication area. Joperation with 
ine number of record Jnumbered data set. 
ompared to table | 
ntry of same length. | 
j 



Issue message IKJ52309I 
and return with return 
code 8. 

Issue message IKJ52402I 
and return, return 
code 12. 



Table 72. IKJEBEWR Error and Exceptional Conditions 



Indication 



h 



Error flag on in 
DCBSTATS field in 
utility workarea upon 
return from IKJEBELO 



Condition 



I/O error in searching 
for record having same 
key as record to be 
written. 



I 



Action 



Return with same return 
code as received from 
IKJEBELO. 



Error flag on in 
DCBSTATS field in 
utility workarea upon 
return from IKJEBEDL 



I/O error in deleting 
old record having same 
key as record to be 
written. 



Return with same return 
code as received from 
IKJEBEDL. 



I~ 



IKJEBEAD 

Nonzero return code 



Error in adding new 
block. 



Return with same return 
code as received from 

IKJEBEAD. 



IKJEBEWB 

Nonzero return code 



Error in writing 
block . 



Return with same return 
code as received from 
IKJEBEWB. 



f- 



IKJEBEDU 

Nonzero return code 



Error in updating 
directory block entry. 



Return with same return 
code as received from 
IKJEBEWD. 



Table 73. IKJEBERR Error and Exceptional Conditions 
| Indication | Condition | 



Action 



■+- 



I IKJEBELO 1 1/0 error in locating | Return with same return 

| Nonzero return | record. j code as received from 

land error flag on in | j IKJEBELO. 

| DCBSTATS field in | | 

| utility workarea | j 

L J X 
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Table 74. IKJEBEDR Error and Exceptional conditions 

i r 



Indication 



Condition 



Action 



IKJEBELO 

Nonzero return code 

and error flag not set 

in DCBSTATS in utility 

workarea. 



Record to be deleted | Return with return 
does not exist in data | code 4. 
set. | 

I 



-+- 



IKJEBELO 

Nonzero return code 
error flag set on 
in DCBSTATS field 



I/O error in locating | Return with same return 
record. I code received from 

| IKJEBELO. 

I 



h 



IKJEBEDL 

Return code other 
than or 8 
error flag on in 
DCBSTATS field. 



Error in deleting 
record , I/O error, 



jReturn with same return 
| code as received from 
| IKJEBEDL. 
I 



IKJEBEDL 

Return code other 

than or 8 

error flag not set 

in DCBSTATS 



Error other than 
I/O error in 
deleting record. 



| Return with return 
| code 4. 



No£§ : Return code 8 from IKJEBEDL indicates data set is empty and is 
not considered an exceptional condition in IKJEBEDR, which returns with 
return code 0. 



Table 75. IKJEBELO Error and Exceptional Conditions 
i — 



Indication 



I 

IIKJEBEDS 

JReturn code not less 

Ithan 8 



Condition 



Action 



h 

IIKJEBEDS 
JReturn code = 4 



I/O error in directory 
search or empty data 
set. 



Return with same return 
code as received from 
IKJEBEDS. 



♦Directory search 
indicates record not 
in data set. 



Data block indicated 
by IKJEBEDS read in, 
then returns with return 
code 4. 



IIKJEBERB 

| Nonzero return code 

I 



Error in reading data 
block. 



Return with same return 
code as received from 
IKJEBERB. 



\ 

| Current reference key 
Icompared to key of 
|each record in block 
jwithout success. 



*Record not found in 
data block. 



Return with return 
code 4. 



*Not an error condition. 
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Table 76. IKJEBEDL Error and Exceptional Conditions 

T 



I 



Indication 



Condition 



Action 



IIKJEBEWB j I/O error in writing 1 Return with same return 

| Nonzero return code | empty data block. j code as received from 
| | JIKJEBEWB. 



K _ 

IIKJEBEDS 

| Nonzero return code 



-+- 



-+- 



| Directory search not |Return with same return 
| successful (occurs | code as received from 
| twice) . IIKJEBEDS. 



■+- 



+■ 



jLast level directory |*Data set empty after | Return with return 
| block has zero entries | record removal. | code 8. 



H 



+ 



IIKJEBERB | I/O error in reading 1 Return with same return 

| Nonzero return code | directory block. | code as received from 
| | IIKJEBERB. 

L X X 

*Not an error condition. 



Table 77. IKJEBEAD Error and Exceptional Conditions 



Indication 



I 



Condition 



Action 



+ 



JIKJEBEAs | I/O error from buffer |Return with same return 

| Nonzero return code | assignment. | code as received from 

| | IIKJEBEAS. 



JIKJEBEWB or IKJEBEWA 
| Nonzero return code 
I 



H 

| I/O error in BSAM 
| write of new block. 
I 



| Return with same return 
| code as received from 
IIKJEBEWB or IKJEBEWA. 



IIKJEBERB | Error in reading empty | Return with same return 

j Nonzero return code | block into core. | code as received from 
I | IIKJEBERB. 

L J J 



Table 78. IKJEBEDU Error and Exceptional Conditions 



Indication 



I 



Condition 



~r- 
I 



Action 



| Error flag on in 
JDCBSTATS field in 
| utility workarea upon 
{return from IKJEBEDS 



| I/O er 

Isearch 

I 

I 
x 



ror in directory | Return with same return 
| code as received from 
| IKJEBEDS. 



IIKJEBERB | Error 

INonzero return code |level 



in reading lower | Return with same return 
directory block, j | code as received from 
IIKJEBEDS. 



| IKJEBEAD | Error 

JNonzero return code J block 



in getting new | Return with same return 
for block split. (code as received from 
| IKJEBEAD. 



IIKJEBEWB | Error 

JNonzero return code |block 



in writting new | Return with same return 
after split. | code as received from 

IIKJEBEWB. 
i 
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Table 79. IKJEBEWB Error and Exceptional Conditions 
i — 



Indication 



Condition 



Action 



I- 

IIKJEBEWA 

| Nonzero return code 



+ 



-h 



H 



|I/0 error in | Return with same return | 

| previously initiated | code as received from | 

| I/O. jIKJEBEWA. | 

-j j j 



Table 80. IKJEBEDS Error and Exceptional Conditions 



r ~ — ■ — "■ ■ ■■- 

| Indication 

i„ ._. „ 


T™ - ~ - - " "" 

| Condition 

L ..„_ „ ,.. _ 


| Action 


1 


r — 
|DSDB 


r — — 
|Data set empty. 


| Return with return 


l 


|NUM. INDEX field zero 


1 
1 

1 

i 11UJL , r _ im , „„ 11T _ 


| code 8, second word of 
| input parameter list is 
| address of DSDB. 

_ „ ,i . r - . , ,.,,_ _ „ ._ 






l 


— t 




IIKJEBERB 


| Error in reading 


| Return with same return 




INonzero return code 


| directory block. 


| code as received from 




| Record key greater 


1 

| Record key larger 


| IKJEBERB. 

| Return with return 


H 


|than key in last enti 


*y|than limits of data 


| code 4, second word of 




|in DSDB 


| set. 

1 

1 

1 

1 

1 

1 

1 


| parameter list contains 

| the address of the 

| directory block 

j containing entry with 

| highest key. BUFRER 

| field of this directory 

| block points to this 

| entry. 
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Table 81. IKJEBERB Error and Exceptional Conditions 



I 



Indication 



Condition 



Action 



JIKJEBEWA 

| Nonzero return code 



| Error in previously 
linitiated I/O. 



| Return with same return 
| code as received from 

IIKJEBEWA. 



jIKJEBEAS 

| Nonzero return code 



| Error in obtaining 

| empty buffer. 

I 



Return with same return 
code as received from 
IKJEBEAS. 



IIKJEBEWA 

| Nonzero return 



| Error in reading in 
| block. 



jReturn with same return 
| code as received from 
IIKJEBEWA. 



Table 82. IKJEBEWA Error and Exceptional Conditions 
i — 



Indication 



Condition 



Action 



Test EBC flags after 
I/O complete 



I/O error in XDAP read 
or write. 






Test error flag in 
DCBSTATS field in 
utility workarea 



I/O error in BSAM 
write . 



Synad routine s 
error informati 
utility workare 
turns on error 
DCBSTATS field 
utility workare 
Return with ret 
code 12. 

CHECK will have 
synad routine, 
stores error in 
in utility work 
turns on error 
DCBSTATS field 
returning contr 
CHECK. IKJEEEWA 
returns with re 
code 12. 



tores 

on in 

a and 

flag in 

in 

a. 

urn 

entered 
which 
formation | 
area and 
flag in 
before 
ol to 

turn 
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Register Usage Table 



liOil_ie_Name 
IKJEBEAA 



IKJEBEAE 

IKJEBEAT 

IKJEBEBO 
IKJEBECG 
IKJEBECH 
IKJEBECI 
IKJEBECN 
IKJEBECO 
IKJEBEDA 
IKJEBEDE 
IKJEBEDO 
IKJEBEEX 

IKJEBEFC 
IKJEBEFI 
IKJEBEFO 
IKJEBEHE 
IKJEBEIM 
IKJEBEIN 
IKJEBEIP 
IKJEBEIS 
IKJEBELE 
IKJEBELI 
IKJEBELT 
IKJEBEMA 
IKJEBEME 
IKJEBEME 



Esg.ister_Contents_at._En.trx 

-- address of parameter list 
(See next table for information about the csects of 

IKJEBEAA.) 

-- entry code 

— address of STAE work area 

— used with entry code 12 



— address of parameter list 

— address of save area 
-- return address 

— address of EDIT communication area (IKJEBECA) 

— address of EDIT Communication area (IKJEBECA) 

— address of EDIT communication area 

— address of parameter list 

— address of EDIT communication area 
-- address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT Access Method work area (UTILWORK) 

— address of EDIT communication area 

— address of EDIT communication area 
-- address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 

— address of command processor parameter list (CPPL) 

— address of EDIT communication area 
-- address of EDIT communication area 

— address of parameter list 

— address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 

(Continued) 
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ll2dule_Name 
IKJEBEMS 



IKJEBEPS 
IKJEBERE 
IKJEBERN 
IKJEBERU 
IKJEBESA 
IKJEBESC 
IKJEBESE 

IKJEBESN 
IKJEBETA 
IKJEBETO 
IKJEBEUI 
IKJEBEUP 
IKJEBEUT 

IKJEBEVE 



M2ister_Contents_at_Entrx 
— address of EDIT communication area 
— address of parameter list 



— address (or complimented address) of 8-byte field 

— address of EDIT communication area 

— address of parameter list 
— address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 

— address of parameter list 

— address of EDIT communication area 
-- address of EDIT communication area 

— address of EDIT communication area 

— address of EDIT communication area 
-- address of EDIT communication area 

— address of EDIT communication area 

— address of 3-word parameter list 

— address of EDIT communication area 
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Csect Name 

iModule_IKJEBEAA)_ Register Contents at Entry 



IKJEBEAD 

IKJEBEAS 
IKJEBEDL 
IKJEBEDR 

IKJEBEDS 
IKJEBEDU 
IKJEBELO 
IKJEBEMV 

IKJEBERB 
IKJEBERR 
IKJEBEWA 
IKJEBEWB 
IKJEBEWR 



— address of 2-word parameter list 

-- address of 2-word parameter list 

-- address of 2-word parameter list 

-- address of a key value or zero 
-- address of UTILWORK 

-- address of 2-word parameter list 

-- address of 3-word parameter list 

-- address of 3-word parameter list 

-- length of data to be moved 

-- address of 2-word parameter list 

-- address of 2-word parameter list 

■- address of 1- to 3-word parameter list 

■- address of 2-word parameter list 

-- address of 2-word parameter list 

-- address of 3-word parameter list 
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Section 7: Appendix 



This appendix describes the formats of the EDIT command and subcommands. 



Formats of the EDIT Command and Subcommands 

The notation which defines the syntax used in this section is as 
follows: 

• A The underscore indicates a default value. 

B 

• A Braces group related, alternative items; for proper operation, 
B one of the items within braces must be specified. 

• C Brackets group related, alternative items. Items within 
D brackets are optional; none need be specified for proper 

operation. 

For a more detailed description of these formats see the publication, 

IlM-^xstem/SGO^Operatin^System^ Time Sharing ...Option , g _ Command ..Language 

| E§fer_ejic_e, GC 28-6732. 
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EDIT COMMAND 



| COMMAND 



OPERANDS 



data-set-name [NEW" 
[OLD 
(jflnteger 1 



PLI 
PLIF 
ASM 
COBOL 



integer 21 [CHARIS! 
72 J LCHAR4 8J 



GOFORT r([FREE "| )] 



FORTE 

FORTG 

FORTGI 

FORTH 

TEXT 

DATA 

CLIST 

CNTL 

BASIC 

IPLI 



_FIXEDJ J 



(rCHA£j5j)"K 
V LCHAR4 8_T 



SCAN "I 

NOSCAN J 

' NUM [ (integer 1] [ intege 

NONUM 

[BLOCK (integer) ] 

[LINE (integer) ] 



r2]) ]j 



[CAPS] 
[aSISJ 



[operands] optional items; choose one or omit all. 

operand underline identifies default. 

operand a variable; substitute a name or value. 

OPERAND a constant; spell as shown. 

'*,(). special characters; use as shown. 
All items must be separated by one or more blanks or a comma. 
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BOTTOM SUBCOMMAND 



I T" 

| SUBCOMMAND | 



OPERANDS 



H — 


+ 




-1 


1 


BOTTOM 


1 




1 


1 


or B 


1 


None 


1 


L-. ' 


J. 




_ _ _ j 



CHANGE SUBCOMMAND 



| SUBCOMMAND 
j. 



OPERANDS 



(CHANGE 

I or 

( C ) 



pLine-number 1[ line-number2 ]~] 
L * [count] J 



special delimiter string 1[ special delimiter[string2 
[special delimiter[ ALL ]] ] ] 

count2 



DELETE SUBCOMMAND 



i r~ 

SUBCOMMAND I 



OPERANDS 



DELETE 
{ or 



I 
I 
I 



line-number-1 [ line-number-2 ] 
* [count] 



DOWN SUBCOMMAND 



SUBCOMMAND 



OPERANDS 



| DOWN 



[ count ] 



END SUBCOMMAND 



| SUBCOMMAND | 



I- 

| END 

i 



OPERANDS 



None 



FIND SUBCOMMAND 



, T _ 

| SUBCOMMAND j 



OPERANDS 



FIND 



| special delimiter string[ special delimiter[ count ]] 
.j 
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FORMAT SUBCOMMAND 

A description of the format of this subcommand can be found in the 

Program Product publication , IBM System/3 60 Operating, System: Time 

Sharing Option, „ TSO Data Utilities: COPY^^FORMAT^^LIST,^,!!^^^^!!^^^!^ 

I Guide and Reference, GC28-6765. 



HELP SUBCOMMAND 



SUBCOMMAND 



OPERANDS 



HELP) 



subcommand-name [ FUNCTION ] 
[ SYNTAX] 
[ OPERANDS[ list-of-operands] 

[kkh] 



INPUT SUBCOMMAND 



SUBCOMMAND 



OPERANDS 



(INPUT) 

I or ( 

I 



line-numberf 



[incrementTlrRl [PROMPT 1 

119. J LlJ L n °p r omptJ 



INSERT SUBCOMMAND 



SUBCOMMAND 



OPERANDS 



INSERT 
or 
IN 



[ insert-data ] 



INSERT/REPLACE/DELETE SUBCOMMAND 



| SUBCOMMAND I 



h 



-+- 



OPERANDS 



fline-number[ string ]l 



LIST SUBCOMMAND 




OPERANDS 



line-number- 1 [ line-number-2 ]"] 
_*[ count] J 

NUM 1 
SNUMJ 
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MERGE SUBCOMMAND 

A description of the format of this subcommand can be found in the 

Program Product publication, IBM_§xstem/3 60_Qp.erating System; Time 

Sharin2_0£tion x _TS0_Data_Utilitiesj. COPY, FORMAtJ LIST, MERGE, User's 

| Guide and Reference, GC28-6765. 



PROFILE SUBCOMMAND 



1 ■ "" T ' ■- " 

| COMMAND | 


■ — ■■" ■ ■■ "- — - — i 

OPERANDS | 


1 (profile) 

| PROF 


CHAR (rchar 
IBS 


acterj) LINE (( character )) | 
) I ATTN ) | 


i * 


NOCHAR 


NOLINE | 




[PROMPT ] 

LnopromptJ 


[intercom 1 | 
LnointercomJ i 






[pause 1 
LnopauseJ 


[MSGID 1 | 

LnomsgicJ i 





renum subcommand 



i r- 

| SUBCOMMAND | 



OPERANDS 



RENUM 
or REN 



[ new-line-number[ increment[ old- 
line-number ] ] ] 



RUN SUBCOMMAND 



| SUBCOMMAND | 
| + . 



OPERANDS 



— ^ 



RUN 

or 

R 



[ 'parameters 1 ] 



[TEST I 

[notestJ 



[LPRECl 
LS PR EC J 

[CHECK] 
[OPT J 
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SAVE SUBCOMMAND 



r — t 

| SUBCOMMAND | 

i i 




OPERANDS 


- 1 

1 

... . j 


1 
1 


Isave) i 

or Sj | 

. ,. : l 


[ data-set-name] 




1 

i 

i 
j 



SCAN SUBCOMMAND 



t r - 

| SUBCOMMAND | 



| 

I SCAN) 
or 
SC ) 

I 



OPERANDS 



( line-number-1[ line-number- 2 ]j 
I *[ count] ' 

Ton ] 

LOFFJ 



TABSET SUBCOMMAND 



1 T 

| SUBCOMMAND 
h 

I TABSET) 
or I 
TAB 



OPERANDS 







ON[ (integer-list) ] 

OFF 

IMAGE 



] 



TOP SUBCOMMAND 



I T* 

| SUBCOMMAND | 



OPERANDS 



TOP 



UP SUBCOMMAND 



SUBCOMMAND | 
+- 



OPERANDS 



| UP 
i 



[count ] 



VERIFY SUBCOMMAND 



| SUBCOMMAND | 



OPERANDS 



I (verify) 

I ( or V 



ON 

OFF 
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Glossary 



§ b n o r m a l_e n d_o f _ t as k £ A B E N D}_ : Termination 

of a task prior to normal completion 
because of an error condition. 



command language : The set of commands, 
subcommands , and operands recognized by 
TSO. 



allocate: To assign a resource for use in 
performing a specific task. 



a t t en t ion_e x i t _r o ut i ne : A routine that 
receives control when an attention 
interruption is received by the system. 



£££§H£i2H_in££££^E£i.2I! • A* 1 interruption of 
instruction execution caused by a terminal 
user hitting the attention key. See also 
"simulated attention". 

attention_key : A function key on terminals 
that causes an interruption of execution by 
the CPU. 

attributes: See user attributes. 

1ASIC: An algebra-like language used for 
problem solving by engineers, scientists, 
and others who may not be professional 
programmers. 

iiP-Ck: One record or several records 
grouped together in an unbroken seguence 
for transfer in or out of main storage as a 
unit. 



command_£rocessor [CP]_: In TSO, a problem 

program executed as the result of entering 
a command at the terminal. Any problem 
program can be defined as a command 
processor by assigning a command name to 
the program and including the program in a 
command library. 

command scan: A service routine used by 
command processors to check the syntax of 
TSO commands and subcommands. 

CP: See "command processor". 

cur rental ine : See "current record". 

cur rental ine_£ointer : A pointer that 
indicates the line of a line data set with 
which a user is currently working. A 
terminal user can refer to the value of the 
current line pointer by entering an 
asterisk (*) with EDIT subcommands. 

cur renter e cor d : The record in the utility 
data set pointed to by the current line 
pointer. 

DAIR: See "dynamic allocation interface 
routine 11 . 



catalog : 

1. noun: In the System/360 Operating 
System, a collection of data set 
indexes that are used by the control 
program to locate a volume containing 
a specific data set. 

2. verb: To include the volume 
identification of a data set in the 
catalog. 

2 h a r ac t e r- d e le t ion_c h a r ac t e r : A character 
within a line of terminal input specifying 
that it and the immediately preceding 
character are to be removed from the line. 

character string: Any seguence of 
characters . 

command: In TSO, a reguest from a terminal 
for the execution of a particular program, 
called a command processor. The command 
processor is in a command library under the 
command name. Any subseguent commands 
processed directly by that command 
processor are called subcommands. 



ililt a_blo ck : A control block in the EDIT 
Access Method which contains user records 
and associated keys and line numbers. 

data_set: A collection of data that is 
accessible by the system. The data set 
usually resides on an auxiliary storage 
device. 

data set _ organization: The arrangement by 
data management of information in a data 
set. For example, seguential organization, 
or partitioned organization. 

£a t a_sj2 1 _n am e : The term or phrase used to 
identify a data set (see gualif ied name) . 

direc t o r x_blo c k : A control block in the 
EDIT Access Method which contains pointers 
to data blocks or to lower-level directory 
blocks. 

^YB§ffJ:g, r §3:lQg§tiQg^iBtg££§ce_routine 
JDAIRi.: A TSO service routine that 
performs various data management functions. 

ECT: See "environment control table". 
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I2I1«§:CC ess__ me t ho d : The portion of the 
EDIT Command Processor which reads , writes 
and deletes records in the utility data 
set. 



ITF: BASIC: A conversational subset of 
BASIC designed for ease of use at a 
terminal. 



§Sii_d a t a_s e t : The QSAM-formatted data set 
built by the EDIT Command Processor. 

edit__mode: The operating condition of EDIT 
in which terminal input is considered to be 
EDIT subcommands. 

121 T_s e ssi o n : The time elapsed from the 
entry of the EDIT command to the 
termination of EDIT Command processing. 

en v i r o n m e n t _ c o n t r o 1 _ t a b 1 e [ E C T]_ : A control 

block which contains information about the 
user's environment in the foreground 
region . 

£i£s t- leve l_me ssage : Diagnostic message 
which identifies a general condition; more 
specific information is available in a 
second-level message if the text is 
followed by a " + " . 

£ 2£I!!at_da t a_se t : The data set built by the 
EDIT Command Processor for operation of the 
FORMAT Program Product Command. 

GETLINE: A service routine used by command 
processors to obtain input. GETLINE passes 
successive lines from the source indicated 
by the current input stack element: the 
terminal, or an in-storage list. 

input, mode: The operating condition of 
EDIT in which terminal input is considered 
to be data. 

input^stack: A push-down list of sources 
of input for GETLINE. Possible sources are 
the terminal or an in-storage list. 

ins ertion_ text : Portion added to a message 
which gives specific detail to the general 
condition identified by the message. 



in-storage data, set : See 
Polish-notated data set". 



'reverse 



in- storage, list: A chain of input lines in 
main storage, such as commands in an EXEC 
procedure, that are used in place of 
terminal input. 



in£ £££ u£t i 2H : 
the control pr 
System. The t 
automatically 
a problem stat 
execution of a 
instruction, 
occurs in such 
be restored to 
in systems tha 
at a time, to 



A transfer of CPU control to 
ogram of the Operating 
ransfer is initiated 
by the computing system or by 
e program through the 

supervisor call [SVC) 
The transfer of control 

a way that control can later 

the interrupted program, or, 
t perform more than one task 
a different program. 



ITF: PL/I: A conversational subset of 
PL/I designed for ease of use at the 
terminal. 



key;: The mechanism used by the EDIT Access 
Method to locate records within the utility 
data set; a binary number equivalent to the 
line number of the record. 



keyword: A command operand that consists 
of a specific character string (such as 
FOETLIB or PRINT) and optionally a 
parenthesized value. 

LANGPRCR: The BASIC/IPLI syntax checker. 

line: 

1. A single string of one or more 
characters, ending with a carriage 
return, typed at a terminal and 
entered into the system. 

2. In the EDIT Access Method - a record 
and its associated key and line 
number. 

Iine_^ie±i2H-_ch ar ac ter : A terminal 
character that specifies that it and all 
preceding characters are to be deleted from 
a line of terminal input. 

iiil£_EU.l£§_E • In the EDIT Access Method - a 
number associated with a record in the 
utility data set; the printable equivalent 
of the record's key. 

load module: The output of the linkage 

editor; a program in a form suitable for 
loading into main storage for execution. 

i23ical_r ecor d : A record that is defined 
in terms of the information it contains 
rather than by its physical qualities. 

lower-level direcjbory_block: A control 
block in the EDIT Access Method which 
contains pointers to data blocks. 

member : A partition of a partitioned data 
set . 

roe rcj e_d a t a_se t : The data set built by the 
EDIT Command Processor for operation of the 
MERGE Program Product Command. 

name: A one to eight character alphameric 
term that identifies a data set, a command 
or control statement, a program, or a 
cataloged procedure. The first character 
of the name must be alphabetic. 
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operand: In the TSO command language , 
information entered with a command name to 
define the data on which a command 
processor operates and to control the 
execution of the command processor. Some 
operands are positional, identified by 
their sequence in the command input line, 
others are identified by keywords. 



££ad_l as t : Instruction to the EDIT Access 
Method to locate the last record (the 
highest key) of the utility data set. 



read^nex t : Instruction to the EDIT Access 
Method to locate the record following (with 
the next higher key) the current record. 



PARSE: A service routine used by command 
processors to check the syntax of 
parameters and operands. 



£§ad_top: Instruction to the EDIT Access 
Method to locate the first record (the 
lowest key) of the utility data set. 



partitione 
stored in 
cataloged 
partitione 
program li 
independen 
of which n 
part of a 
more segue 
library co 
index) tha 
locate a p 
member has 
directory 
Members ca 
Records wi 
sequential 



d_data_set : 
direct acces 
like any oth 
d data set i 
brary. It i 
t partitions 
ormally cont 
program, in 
ntial blocks 
ntains a bui 
t the contro 
rogram in th 
a unique na 
at the begin 
n be added o 
thin members 



A data set that is 
s storage and can be 
er data set. A 
s often called a 
s divided into 

called members, each 
ains a program or 
the form of one or 

Each program 
lt-in directory (or 
1 program can use to 
e library. Each 

e listed in a 
ning of the data set. 
r deleted as needed. 

are organized 



Bfeisical^ record: A record that is defined 
in terms of physical qualities rather than 
by the information it contains. (See 
record.) 

EliZI- A high-level programming language 
that has features of both COBOL and 
FORTRAN, plus additional features. 

profile [u ser ]_ : The set of characteristics 

that describe the user to the system. 

E£2HEtinc[: A system function that helps a 
terminal user by requesting him to supply 
operands necessary to continue processing. 

PUTGET: A service routine used by command 
processors to put messages to the terminal 
and to receive the user's responses to the 
messages. 

PUTLINE: A service routine that sends 
output to the terminal. Putline 
selectively puts out messages according to 
whether or not a user has suppressed 
prompting or is executing a command 
procedure. 

2MJ=i£ JgcLflgJg : A data set name that is 
composed of two or more names separated by 
periods. (For example, MOORE. SALES. JUNE.) 

read. current: Instruction to the EDIT 
Access Method to locate the current record. 



record : 

1. One or more data fields that represent 
an organized body of related data, 
such as all of the basic accounting 
information concerning a single sales 
transaction. (See also logical record 
and physical record.) 

2. In the EDIT Access Method - a line 
entered by the user into the system 
during an EDIT session; each record is 
identified by a unique key. 

£ e^ io n_c o n t r o 1 _ t a s k [R C T]_ : The control 

program routine handling quiesce/restore 
and LOGON/LOGOFF. There is one RCT for 
each active foreground region. 

r e n u m , data s e t : The utility data set built 

by the EDIT Command Processor for operation 
of the Renum subcommand of EDIT; becomes 
the Utility data set when renumbering is 
complete . 

£®t£X_£2iitilI§ • A routine which is used to 
attempt recovery from an error. 

reverse, Polish-not at ed _ data_ set : A data 
set built and maintained in main storage by 
LANGPRCR. 

£M_ila t a_s e t : The data set built by the 
EDIT Command Processor for operation of the 
RUN TSO Command. 

§ e co n d- 1 e v el_m es s acje : Diagnostic message 
associated with a first-level message; 
contains specific information about the 
general condition identified in the 
first-level message. 

STACK: A service routine that manipulates 
the input stack. 

S T A E [spe cif j_ task_ a sy_ nc hr on ou s__ex i t\_ : A 

macro instruction specifying a routine to 
receive control in the event of the issuing 
task's abnormal termination (ABEND). 

STAI_Jsubtask_ ABEND,,. intercept) : A keyword 
of the ATTACH macro instruction specifying 
a routine to receive control after the 
abnormal termination of a daughter task. 
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subcommand: For TSO, a subcommand is a 
request for a particular operation to be 
performed, the particular operation falling 
within the scope of work requested by the 
command to which the subcommand applies. 

§waj>: To write an image of a foreground 
job's main storage region to auxiliary 
storage, and to read in another job's main 
storage image into the region. 

§Hi*E„data_set • A data set dedicated to the 
swapping operation. 

syn t ax_che cker : A program that tests 
source statements in a programming language 
for violations of that language's syntax. 

task: A unit of work for the central 
processing unit defined by the control 
program . 

TCAM: See "telecommunications access 
method". 

t§l£co m m u n i ca t ions_a ccess _me t ho d [TC A h)_ : A 

generalized terminal I/O support package, 
providing application program independence 
of terminal characteristics. 

terminal: A device resembling a typewriter 
that is used to communicate with the 
system. 

terminal , mo nit Preprogram __(TMP) : A program 
that accepts and interprets commands from 
the terminal, and causes the appropriate 
command processors to be scheduled and 
executed. 

terminal user : See "user". 

TGET: An I/O macro instruction used by 
problem programs to obtain a line of input 
from the terminal. 



regions, swapping, and general control of 
the time-sharing operation. 



iime_sharin3_option [TSOJ_: An option of 

the operating system providing 
conversational time sharing from remote 
terminals. 



TMP: See "terminal monitor program", 



TSC: See "time sharing control task". 



M®£ : Under TSO, anyone with an entry in 
the User Attribute Data Set; anyone 
eligible to log on. 

u ser _a t t r i bu t es : A set of parameters in 
the User Attribute Data Set (UADS) . The 
parameters describe the user to the system: 
whether he is authorized to use the ACCOUNT 
command, what size main storage region he 
is to be assigned, etc. 

USE RID: See "user identification". 

user_i identification [US E R ID}_ : A one to 

eight character symbol identifying each 
system user. 

user mi profile nn table (UPT) : A table of user 

attributes kept for each active user, built 
by Logon from information in the LOGON 
command, the UADS, and the Logon procedure. 

utility data, set : The data set built and 
maintained by the EDIT Access Method. 

verification: A use of the EDIT command in 
which all subcommands are acknowledged and 
any textual changes are displayed as they 
are made. 



tiine_sharing_control_task_ITSC^: A TSO 
system task that handles system 
initialization, allocation of time-shared 



verify message: Message containing the 
current record and key, displayed by the 
EDIT command processor. 
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Indexes to program logic manuals are 
consolidated in the publication IBM 
System/360 Operating System; Program Logic 
Manual Master Index , Order No. GY28-6717. 
For additional information about any 
subject listed below, refer to other 
publications listed for the same subject in 
the Master Index. 



see current line pointer 



abnormal end exit routine 

error and exceptional conditions 
abnormal end of task (ABEND) 

definition 463 
allocate 

definition 463 
attention exit routine 

definition 463 

error and exceptional conditions 

method of operation diagram 487 
attention interruption 

definition 463 

EDIT handling of 52 
attention key 

definition 463 
attributes - See user attributes 



B - see BOTTOM subcommand 
BASIC 

data set requirement 29 

definition 463 
BASIC renum service routine 61 
block 

definition 463 
BOTTOM subcommand 

see also subcommand processor 

summary of operations 63 

syntax 459 



C - see CHANGE subcommand 
catalog 

definition 463 
CHANGE subcommand 

see also subcommand processor 

summary of operations 67 

syntax 459 
character-deletion character 

definition 463 

user specification of 106 
character string 

definition 463 
command 

definition 463 
command invoker service routine 55 



414 



414 



command language 

definition 463 
command processor (CP) 

definition 463 
command scan 

definition 463 

EDIT program's use of 51 

function 17 
controller 

error and exceptional conditions 413 

method of operation diagram 4 83 
CP - see command processor 
current line 

definition 463 
current line pointer 

definition 463 

updating of 25 

use of 18 
current record 

definition 463 



D - see DELETE subcommand 

DAIR - see dynamic allocation interface 

routine 
data block 

definition 463 
data set 

created by EDIT program 26 

definition 463 
data set allocation service routine 56 
data set name 

definition 463 

operand processing 33 
data set organization 

definition 463 

of EDIT data set 26 

of Utility data set 26 
delete operation routine 

error and exceptional conditions 449 

method of operation diagram 539 
DELETE subcommand 

see also subcommand processor 

summary of operations 71 

syntax 459 
directory block 

definition 463 

use of 138 
directory search routine 

error and exceptional conditions 451 

method of operation diagram 543 
directory update routine 

error and exceptional conditions 450 

method of operation diagram 547 
DOWN subcommand 

see also subcommand processor 

summary of operations 7 3 

syntax 459 
dynamic allocation interface routine (DAIR) 

definition 463 

function 17 
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33 



33 



51 
53,54 



ECT - see environment control table 
EDIT access method 
definition 464 
operation of 135 
EDIT command 

proper syntax of 458 
validation of operands 
edit data set 

allocation of 26,35 
definition 464 
use of 26 
edit mode 

change of mode to 22 
definition of 464 
initial selection of 
EDIT program 

access method 135-143 

controller 49-54 

error and exceptional conditions 413 

processing 49 

abnormal end and attention exits 

49 
establishing mode of operation 50 
handling attention interrupt 52 
invoking EDIT subcommand 

processor 51 
obtaining EDIT subcommand 50 
SCAN processing 49 
termination processing 53 
validating an EDIT subcommand 
verify message handling 52 
error and attention exit routines 
initialization 33-47 

data set type, prompting for 43 
error and exceptional conditions 
408-412 

operand processing 33 
BLOCK keyword 3 8 
CAPS/ASIS keyword 39 
data set name 29 
GOFORT data set type 40 
LINE keyword and keyword value 
NEW/OLD keyword 3 
NUM/NONUM keyword 3 9 
PLI or PLI/F source margins 36 
SCAN/NOSCAN keyword 3 6 
processor dependent information, 

obtaining 43 
summary of operations 41 
termination processing 43 
service routines 54 
subcommand processors 62-133 
BOTTOM 6 2 
CHANGE 6 4 
DELETE 6 9 
DOWN 7 2 
END 7 4 
FIND 76 
FORMAT 8 
HELP 83 
INPUT 8 5 
INSERT 93 

Line Insert/Replace/Delete 96 
LIST 98 
MERGE 10 2 
PROFILE 106 
RENUM 10 9 
RUN 112 
SAVE 116 
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36 



EDIT program, subcommand processors 
(continued) 

SCAN 119 
TABSET 125 
TOP 128 
UP 130 
VERIFY 13 2 
EDIT service routines 54-62 

BASIC renum 61 

command invoker 55 

data set allocation 56 

final copy 57 

initial copy 56 

line edit 57 

message selection 58 

processor data set search 60 

string search 61 

translation 58 
EDIT session 

definition 464 
EDIT subcommands 

invoking processors for 51 

obtaining of 50 

processors - see EDIT program 

syntax 459-462 

validation of 51 
END subcommand 

see also subcommand processor 

summary of operations 75 

syntax 459 
environment control table (ECT) 

definition 464 
externals - see syntax 



final copy service routine 57 
final processing routine 142 

error and exceptional conditions 447 

method of operation diagram 531 
FIND subcommand 

see also subcommand processor 

summary of operations 7 8 

syntax 459 
first-level message 

definition 464 

handling 58-60 
format data set 

definition 464 

use of 26,80 
FORMAT subcommand 

see also subcommand processor 

summary of operations 82 

syntax 46 



GETLINE 

definition 464 
function 17 



H - see HELP subcommand 
HELP subcommand 

see also subcommand processor 

summary of operations 15 

syntax 460 
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I - see INPUT subcommand 




IKJEBEAA 




summary of 154 




IKJEBEAD 




error and exceptional 


conditions 


flowchart 225 




summary of 15 5 




IKJEBEAE 




error and exceptional 


conditions 


flowchart 226 




summary of 156 




IKJEBEAS 




flowchart 227 




summary of 15 7 




IKJEBEAT 




error and exceptional 


conditions 


flowchart 228 




summary of 158 




IKJEBEBO 




error and exceptional 


conditions 


flowchart 229 




summary of 159 




IKJEBECA 




data layout 403 




IKJEBECG 




error and exceptional 


conditions 


flowchart 230-235 




summary of 160 




IKJEBECH 




error and exceptional 


conditions 


flowchart 236-238 




summary of 161 




IKJEBECI 




error and exceptional 


conditions 


flowchart 239-240 




summary of 162 




IKJEBECN 




error and exceptional 


conditions 


flowchart 241-244 




summary of 16 4 




IKJEBECO 




error and exceptional 


conditions 


flowchart 245-247 




summary of 16 5 




IKJEBEDA 




error and exceptional 


conditions 


flowchart 248 




summary of 166 




IKJEBEDE 




error and exceptional 


conditions 


flowchart 249-251 




summary of 167 




IKJEBEDL 




error and exceptional 


conditions 


flowchart 252-254 




summary of 168 




IKJEBEDO 




error and exceptional 


conditions 


flowchart 255,256 




summary of 16 9 




IKJEBEDR 




error and exceptional 


conditions 


flowchart 257 




summary of 170 




IKJEBEDS 




error and exceptional 


conditions 


flowchart 258-260 




summary of 171 
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414 



414 



419 



420-421 



420-421 



414-416 



420-421 



416 



417 



422 



450 



423 



449 



451 



IKJEBEDU 

error and exceptional conditions 

flowchart 261-265 

summary of 172 
IKJEBEEN 

error and exceptional conditions 

flowchart 266 

summary of 173 
IKJEBEEX 

error and exceptional conditions 

flowchart 267 

summary of 17 4 
IKJEBEFC 

error and exceptional conditions 

flowchart 269,269 

summary of 175 
IKJEBEFI 

error and exceptional conditions 

flowchart 270 

summary of 176 
IKJEBEFO 

error and exceptional conditions 

flowchart 271,272 

summary of 177 
IKJEBEHE 

flowchart 273 

summary of 17 8 
IKJEBEIA 

summary of 179 
IKJEBEIM 

error and exceptional conditions 

flowchart 274-278 

summary of 180 
IKJEBEIN 

error and exceptional conditions 

flowchart 279-286 

summary of 181 
IKJEBEIP 

error and exceptional conditions 

flowchart 287,288 

summary of 182 
IKJEBEIS 

error and exceptional conditions 

flowchart 289,290 

summary of 18 4 
IKJEBELE 

flowchart 2 91 

summary of 185 
IKJEBELI 

error and exceptional conditions 

flowchart 292,293 

summary of 186 
IKJEBELO 

error and exceptional conditions 

flowchart 294,295 

summary of 187 
IKJEBELT 

error and exceptional conditions 

flowchart 296-298 

summary of 18 8 
IKJEBEMA 

error and exceptional conditions 

flowchart 299-301 

summary of 189 
IKJEBEMA (Csect of IKJEBEMA) 

summary of 190 



450 



424 



447 



418 



425 



426-427 



427-428 



408-412 



427-428 



429 



430 



449 



431-432 



413 
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IKJEBEME 

error and exceptional conditions 

flowchart 302,303 

summary of 192 
IKJEBEMR 

error and exceptional conditions 

flowchart 304 

summary of 193 
IKJEBEMS 

flowchart 305 

summary of 194 
IKJEBEMV 

flowchart 306 

summary of 195 
IKJEBEPD 

data layout 417 

summary of 196 
IKJEBEPR 

error and exceptional conditions 

flowchart 349-351 

summary of 239 
IKJEBEPS 

flowchart 307 

summary of 197 
IKJEBEPS (Csect Of IKJEBEPS) 

summary of 198 
IKJEBERB 

error and exceptional conditions 

flowchart 308 

summary of 199 
IKJEBERE 

error and exceptional conditions 

flowchart 309-312 

summary of 2 00 
IKJEBERN 

error and exceptional conditions 

flowchart 313 

summary of 2 02 
IKJEBERR 

error and exceptional conditions 

flowchart 314 

summary of 203 
IKJEBERU 

error and exceptional conditions 

flowchart 315,316 

summary of 204 
IKJEBESA 

error and exceptional conditions 

flowchart 317-327 

summary of 2 05 
IKJEBESA (Csect of IKJEBESA) 

summary of 206 
IKJEBESC 

error and exceptional conditions 

flowchart 328-332 

summary of 207 
IKJEBESE 

error and exceptional conditions 

flowchart 333 

summary of 20 8 
IKJEBESN 

error and exceptional conditions 

flowchart 334-339 

summary of 2 09 
IKJEBETA 

error and exceptional conditions 

flowchart 340 

summary of 210 



432-433 



418 



131 



452 



434 



419 



448 



435-436 



437-441 



442-444 



419 



442-444 



445 



IKJEBETO 

error and exceptional conditions 445 

flowchart 341 

summary of 211 
IKJEBEUI 

error and exceptional conditions 447 

flowchart 342 

summary of 212 
IKJEBEUP 

error and exceptional conditions 446 

flowchart 343,344 

summary of 213 
IKJEBEUT 

error and exceptional conditions 448 

flowchart 345 

summary of 214 
IKJEBEVE 

error and exceptional conditions 446 

flowchart 346 

summary of 215 
IKJEBEWA 

error and exceptional conditions 452 

flowchart 347 

summary of 216 
IKJEBEWB 

error and exceptional conditions 451 

flowchart 3 48 

summary of 217 
IKJEBEWR 

error and exceptional conditions 448 

flowchart 349-352 

summary of 218 
IKJEBMA1 

summary of 219 
IKJEBMA2 

summary of 220 
IKJEBMA8 

summary of 221 
IKJEBMA9 

summary of 22 2 
IKJEBSA9 

summary of 223 
implicit subcommand function - see Line 

Insert/Replace/Delete 
IN - see INSERT subcommand 
initial copy service routine 56 
initialization 

EDIT access method 142 

error and exceptional conditions 447 
method of operation diagram 531 

EDIT program 33 

error and exceptional conditions 408-412 
method of operation diagram 481 
summary of operations 41 
input mode 

change of mode to 21,22 

definition of 464 

initial selection of 33 
input stack 

definition 464 

deleting of 53 
INPUT subcommand 

see also subcommand processor 

summary of operations 88 

syntax 460 
INSERT subcommand 

see also subcommand processor 

summary of operations 95 
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INSERT subcommand (continued) 

syntax 460 
Insert/Replace/Delete - see Line 

Insert/Replace/Delete 
insertion text 

definition 464 

use of 59 
in-storage data set - see reverse 

Polish-notated data set 
in-storage list 

definition 464 
interface routine 

error and exceptional conditions 179 

method of operation diagram 533 
interruption 

definition 464 
ITF: BASIC 

data set requirement 29 

definition 464 
ITF:PLI 

data set requirement 29 

definition 464 



key 

definition 464 

subcommand processors' use of 23,24 
keyword 

definition 464 

ASIS 39 

BLOCK 38 

CAPS 39 

FIXED 40 

FREE 40 

LINE 36 

NEW 35 

NONUM 39 

NOSCAN 36,49 

NUM 39 

OLD 35 

SCAN 36,49 



L - see LIST subcommand 
LANGPRCR 

BASIC/IPLI use of 29 

definition 464 
line 

definition 464 
line-deletion character 

definition 464 

user specification of 106 
line edit service routine 57 
Line Insert/Replace/Delete subcommand 

see also subcommand processor 

summary of operations 97 

syntax 460 
line number 

changing of - see RENUM subcommand 

definition 464 

subcommand processors' use of 23,24 
LIST subcommand 

see also subcommand processor 

summary of operations 100 

syntax 460 
load module 

definition 464 

in EDIT program 



load module, in EDIT program (continued) 
list of 145-149 
naming conventions 145 
logical record 

definition 464 
lower-level directory block 
definition 464 
use of 140 



member 

definition 464 
merge data set 

definition 464 

use of 26 ,102 
MERGE subcommand 

see also subcommand processor 

summary of operations 104 

syntax 461 
message selection routine 58 
mode of EDIT operation 

Edit 21,22 

establishment of 33,50 

Input 21,22 



name 

definition 464 



operand 

data set name 33 
definition 465 
source margins 36 



PARSE 

definition 465 

function 17 
partitioned data set 

definition 465 

processing 35 
physical record 

definition 465 
PLI 

definition 465 

validation of source margins 36 
processor data table search service 

routine 60 
PROF - see PROFILE subcommand 
profile, user 

definition 465 
PROFILE subcommand 

see also subcommand processor 

summary of operations 107 

syntax 461 
prompting 

definition 465 
PUTGET 

definition 465 

function 17 
PUTLINE 

definition 465 

function 17 



qualified name 

definition 465 
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R - see RUN subcommand 

RCT - see region control task 

read block routine 

error and exceptional conditions 452 

method of operation diagram 555 
read current 

definition 465 
read last 

definition 465 
read next 

definition 465 
read operation routine 

error and exceptional conditions 448 

method of operation diagram 537 
read top 

definition 465 
record 

definition 465 

subcommand processors 1 use of 23,24 
record delete routine 

error and exceptional conditions 450 

method of operation diagram 543 
record locate routine 

error and exceptional conditions 449 

method of operation diagram 541 
region control task (RCT) 

definition 465 

relationship of EDIT to 14,15 
REN - see RENUM subcommand 
renum data set 

definition 465 

use of 26,109 
RENUM subcommand 

see also subcommand processor 

summary of operations 111 

syntax 461 
retry routine 

abnormal end exit use of 53 

definition 465 
reverse Polish-notated data set 

definition 465 

updating of 25,62 

use of 138 
run data set 

definition 465 

use of 29,112 
RUN subcommand 

see also subcommand processor 

summary of operations 114 

syntax 461 



S - see SAVE subcommand 
SAVE subcommand 

see also subcommand processor 

summary of operations 118 

syntax 462 
SC - see SCAN subcommand 
SCAN subcommand 

summary of operations 121 

syntax 462 
second-level message 

definition 465 

handling 58-60 
STACK 

definition 465 

function 17 



STAE (specify task asynchronous exit) 
definition 465 
processing 485 
STAI (subtask ABEND intercept) 
definition 465 
processing 485 
string search serving routine 66 
subcommand 

definition 466 
EDIT, functions of 18,19 
validation of 51 
subcommand processor 
invoking of 51,52 
BOTTOM 

see also IKJEBEBO 
method of operation diagram 489 
operation of 62 
CHANGE 

see also IKJEBECG,IKJEBECH,IKJEBECN 

method of operation diagram 491 

operation of 6 4 
DELETE 

see also IKJEBEDE 

method of operation diagram 493 

operation of 6 9 
DOWN 

see also IKJEBEDO 

method of operation diagram 49 

operation of 72 
END 

see also IKJEBEEN 

operation of 74 
FIND 

see also IKJEBEFI 

method of operation diagram 497 

operation of 76 
FORMAT 

see also IKJEBEFO 

method of operation diagram 499 

operation of 80 
HELP 

see also IKJEBEHE 

method of operation diagram 501 

operation of 83 
INPUT 

see also IKJEBEIM, IKJEBEIP 

method of operation diagram 503 

operation of 85 
INSERT 

see also IKJEBEIS 

method of operation diagram 505 

operation of 93 
Line Insert/Replace/Delete 

see also IKJEBELI 

method of operation diagram 507 

operation of 96 
LIST 

see also IKJEBELT 

method of operation diagram 509 

operation of 98 
MERGE 

see also IKJEBEME 

method of operation diagram 511 

operation of 102 
PROFILE 

see also IKJEBEPR 

method of operation diagram 513 

operation of 106 
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subcommand processor (continued) 
RENUM 

see also IKJEBERE 

method of operation diagram 515 

operation of 109 
RUN 

see also IKJEBERU 

method of operation diagram 517 

operation of 112 
SAVE 

see also IKJEBESA 

method of operation diagram 519 

operation of 116 
SCAN 

see also IKJEBESC, IKJEBESN 

method of operation diagram 521 

operation of 119 
TABSET 

see also IKJEBETA 

method of operation diagram 523 

operation of 125 
TOP 

see also IKJEBETO 

method of operation diagram 525 

operation of 128 
UP 

see also IKJEBEUP 

method of operation diagram 527 

operation of 130 
VERIFY 

see also IKJEBEVE 

method of operation diagram 529 

operation of 132 
swap 

definition 466 
swap data set 

definition 466 
syntax 

of EDIT command 458 
of EDIT subcommands 459-462 
syntax checker 

definition 466 

use of 29,30,49,119 



TGET 

definition 464 
time sharing control task (TSC) 

definition 464 

relationship of EDIT to 14 
time sharing option (TSO) 

definition 464 

relationship of EDIT to 13-17 
TMP - see terminal monitor program 
TOP subcommand 

see also subcommand processor 

summary of operations 129 

syntax 462 
translation service routine 5 8 
TSC - see time sharing control task 
TSO - see time sharing option 
TTR assignment routine 

error and exceptional conditions 

method of operation diagram 545 



UP subcommand 

see also subcommand processor 

summary of operations 131 

syntax 462 
UPT - see user profile table 
user 

definition 464 
user attributes 

definition 464 
user identification (USERID) 

definition 464 
user profile table (UPT) 

definition 464 

updating of 106 
USERID - see user identification 
utility data set 

definition 464 
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TAB - see TABSET subcommand 
TABSET subcommand 

see also subcommand processor 

summary of operations 127 

syntax 462 
task 

definition 464 
TCAM - see telecommunications access method 
telecommunications access method (TCAM) 

definition 464 
terminal 

definition 464 
terminal monitor program (TMP) 

definition 464 

operation of 16,17 

return of control to 49,53 
terminal user 

definition 464 



V - see VERIFY subcommand 
verification 

definition 464 
verify message 

definition 464 

function 26 

handling 52,58,60 
VERIFY subcommand 

see also subcommand processor 

summary of operation 133 

syntax 462 

wait routine 

error and exceptional conditions 
method of operation diagram 557 

write block routine 

error and exceptional conditions 
method of operation diagram 5 49 

write operation routine 

error and exceptional conditions 
method of operation diagram 535 
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.Command Buffer 



Input Stack 



In-storage 
list of 
commands 




Command Buffer 



EDIT 'engbw. parts. data' j 



t> 



\Putget (IKJPTGT) 



Selects current 
source of input 
indicated by 
input stack 



Terminal Monitor Program 




1. Obtains EDIT 
command from 
command buffer 



Invokes EDIT 
command processor 



3. Waits on Completion 
of EDIT program 



ATTACH 



SVC 3 



Builds and initializes EDIT 
communication area 



Obtains processor -dependent 
information (attributes) 
relating to specified data set 
type. Inserts information into 
EDIT communication area 



Allocates specified data set 



Transfers contents of Edit data 
set into Utility data set 

Processes operands specified on 
EDIT command. (See 
"Processing EDIT Operands) 
If unrecoverable errors are 
detected, exits to TMP; if no 
errors are detected , invokes 
the controller 



k CPPLCBUF 



EDIT 'engbw. parts. da 



EDIT 

communication 
area (IKJEBECA) 



CAPTIBFR 



LOAD/CALL 



LINK 



IKJEBEPS 


IKJEBEPD 


Searches 


Contains 


processor 


attributes 


data table 


for data 


for attributes 


set types 


of data set type 





IKJDAIR 



Allocates Edit data set 
'engbw . parts . data ' 



IKJEBEUI 



Allocates Utility data set 



IKJEBECO 



I 



Formats contents of Edit data 
set into EDIT Access Method 
format; writers into utility datd 
set 




LEGEND 



Writers contents of Edit 
data set into Utility data 
set 



^ EDIT controller 
r (IKJEBEMA) 



SYMBOL MEANING 

Initial entry point 



^N Data flow 



Control flow 



Pointer 

Data reference 



Method of Operation Diagram 1 . Initialization 
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Edit 

Subcommand. . 
00040 Record 




EDIT Initialization 
(IKJEBEIN) 



XCTL 



Putget (IKJPTGT) 



Requests Input from User 



LINK 



Command Buffer 



Subcommand \ 

Putget (IKJPTGT) ? 



^> Obtains Input from User 



Putline (IKJPUTL) 



Display Verify 
Message on 
Terminal 



LINK 



Terminal Monitor 
Program 



SVC 3 



. IKJEBECA 



Command Buffer 




Edit 'Engbw. Parts. Data. 



^> 



Establishes Attention and Error 
Exit Routines 
(IKJEBEATand IKJEBEAE). 

Loads and Initializes Syntax 
Checker if Scan Operand is 
Specified, or if Data Set Type is 
IPLI or BASIC. 



If Data Set is Empty, or Member 
Does not Exist, Invokes the Input 
Mode. If Data Set is not Empty, 
Invokes the Edit Mode. 



Invokes IKJSCAN to Test Validity 
of Subcommand . 
If Operands are Present, Sets 
CAOPERND to 1. 

Invokes Appropriate Subcommand 
Processor. 



Upon Normal Return from 
Subcommand Processor, Checks 
Field in CACFLAG1 to Determine 
if Verify Message is to be 
Displayed; if so, Invokes Message 
Selection Service Routine 
(IKJEBEMS) Which Invokes 
IKJPUTL to Display the Verify 
Message . 



After Detection of Unrecoverable 
Error, or After Completion of 
END Subcommand Processing 
Returns to the TMP. 



1 



IKJEBECA 



/ 



/ 



CASCANON 



IKJEBESC 



Syntax Checkers 



LINK 



Loads and Initializes 
Syntax Checker 



LOAD/CALL 



If Data Set Type is IPLI 
or BASIC, Obtains 
In-Storage Data Set 



IKJEBECA 



IKJEBEIP/IKJEBEIM 



IKJEBEUT 



LINK 



IKJEBECA 



Input Subcommand 
Processor 



Writes Records into 
Utility Data Set 



}■ 



CAOPERND 



Utility Data 

Set 



IKJEBE— 



LINK 



Edit Subcommand 

Processor 

(See Subcommand 

Processors) 



LEGEND 



IKJEBECA 



CALNTOVF 



SYMBOL MEANING 

Initial entry point 



lT> Data flow 



Control flow 



Pointer 



— +~ Data reference 



Method of Operation Diagram 2. Controller 
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I 



A 



Error in 
Initialization 
Routine or in 
STA^Exit 
Routine of 
Controller or 
Command 
Invoker. 



C 



Error in Command Invoker 




Error in 
EDIT 

Subcommand 
Processor 



ATTACH 



Error in 

TSORUN 

Command 

Processor 

Error in 

Compiler 

Error in Loader 
or in User's 
Program 



c 



c 



£ 




TSC RUN 



Terminal Monitor 
Program 



STAI Exit 



I ATTACH 



Edit Initialization 
(IKJEBEIN) 



■ XCTL 



Edit Controller 
(IKJEBEMA) 



STAE Exit 



I LINK 



EDIT Subcommand 
Processor 



I 



LINK/XCTL 



Command Invoker 
(IKJEBECI) 



STAE Exit 



STAI Exit 



J~ 



(Terminal Monitor Program 
Detaches EDIT Program) 

"Edit Ended Due to Error " 



21 



" Edit Ended Due to Error " 
" Enter Save or End " 

(END Subcommand Processor 
Terminates EDIT Program) 



11 



(Command Invoker Detaches 
Subtask) 

" Run Ended Due to Error " 



Loader/User's 
Program 



LEGEND 



SYMBOL MEANING 

Initial entry point 

I y Data flow 

Control flow 



Pointer 

Data reference 



Method of Operation Diagram 3. 

EDIT Program STAE/STAI Processing 
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"ATTN" 

/ 

/ 

/ Null Line, "? ", or 

/ Line of Input 

/ ! 



I 



Attention Exit Routine (IKJEBEAT) 



/ 
/ 



;>© 



Displays Second-Level 
Messages By Invoking 
IKJPUTL. Invokes 
IKJGETLto Obtain 
New Subcommand. 



( Operation of EDIT Routine 
has Been Halted.) 

IKJEBEAT Invokes IKJSCAN to 
Determine What User Entered. 




EDIT Routine Resumes 
Processing; Determines 
that an Interrupt has 
Occurred, and Returns 
Control to the 
Controller. 



New Subcommand 



EDIT Controller (IKJEBEMA) 
I Processes New Subcommand 



Updates EDIT Communication 
Area to Point to New 
Subcommand and Sets 
CAATTNIS Bit of CAATTN 
By Issuing POST Macro 
Instruction. 



LEGEND 



SYMBOL MEANING 

Initial entry point 




~^\ Data flow 

Control flow 



t Pointer 
"^ Data reference 



Method of Operation Diagram 4 , 
EDIT Attention Handling 



Method of Operation Diagrams 481 



Command Buffer 



BOTTOM 



I 




Input Stack 



-N 



IKJEBEMA 



• Validates the 
Subcommand 




LINK 



Invokes the Access 
Method to Read the 
Last Record. 

• Sets the Current Line 
Pointer to the Final 
Record. 

• Returns Control to 
IKJEBEMA. 



CALL 



Records Before and After Processing 



IKJEBECA 



Before 



CACURNUM 



♦ 80 




to Come to 



80 



90 



the Aid of 



90 



100 



their Party 



1001 



IKJEBECA 



After 



CACURNUM 



4 100 



Men 



70 



80 



80 



90 



the Aid of 



90 



100 



their Party 



100i 



Reads the Last Record 
in the Data Set. 




Utility Data 
Set 



LEGEND 



SYMBOL MEANING 

Initial entry point 



~S Data flow 



Control flow 



t Pointer 



■ -+* Data reference 



Method of Operation Diagram 5 . BOTTOM Subcommand 
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Command Buffer 



CHANGE * ' Hour 
? 



I 




f) Input Stack 



-N 



IKJEBEMA 



Validates the 
Subcommand. 



Records Before and After Processing 



IKJEBECA 



Before 



ICACURNUM 



20 



30 



Now is the Hour 



User Receives the Line Up to Character 10 at his Terminal. 
He is then Able to Enter Changes. 




00030 Now is the 



tKJEBECA 



ICACURNUM 



After 



20 



30 



Now is the Time 



Reg 1 



LINK 




30 



40 



30 



40 



7 



IKJEBECA 



Command Buffer 



UTILWORK 




IKJEBECH 



Determines Whether String 
Data or Character Count or 
Both have been Specified as 
Operands of CHANGE. 



Invokes the Access Method to 
Read Records Specified as 
Operands. 



If Both String and Character 
Count Occur, Passes Control 
to IKJEBECN, the Module 
which Processes Character 
Count. 



IXCTL 



IKJEBECG 



Invokes IKJEBELE to Line Edit 
the Records in the Data Set. 





Passes Control to IKJEBECN, 
the Module which Processes 
the Subcommand when 
Character Count has been 
Specified. 



CALL 



Tabulates Characters; 
Translates Characters 
to Upper Case. 



XCTL 



UTILWORK 




Calls IKJPUTLto Print Out 
Specified Record at the 
Terminal Until the Character 
Count is Reached. 



Calls IKJGETLto Obtain 
User's Changes from the 
Terminal. 



• Forms a New Line and Calls 
IKJEBELE to Line Edit it. 



• Calls IKJEBEUT to Write 
New Line into Data Set. 



Returns Control to IKJEBEMA. 



LEGEND 



SYMBOL MEANING 

Initial entry point 



l£> Data flov* 



Control flow 



J Pointer 
** Data reference 



Method of Operation Diagram 6 . CHANGE Subcommand 
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UTILWORK 



Command Buffer 



DELETE 40 60 



* 




,/ Input Stack 



^> 



IKJEBEMA 



• Validates the 
Subcommand . 




LINK 



Invokes the Access 
Method to Delete First 
Record in Range. 



Invokes the Access 
Method to Read and Delete 
Subsequent Records in 
Range. 



Returns Control to 
IKJEBEMA. 



Reg 1 | 



Records Before and After Processing 



IKJEBECA 



Before 



CACURNUM 



30 



40 



the Time 



40 



50 



for All 



50 



60 



Good Men 



60 



701 



IKJEBECA 



After 



CACURNUM 



L 



30 



Now is 



30 



70 



to Come 



70 



80 



to the Aid 



80 



90 



of the 



90 



100 



\ 



Reads Records from 
Utility Data Set. 



Deletes Records Using 
the Delete Operation 
Routine (IKJEBEDR). 



UTILWORK 



Utility Data 
Set 



LEGEND 



SYMBOL MEANING 

Initial entry point 

Data flow 



^ 



Control flow 



T Poin 



Data reference 



Method of Operation Diagram 7 • DELETE Subcommand 
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Command Buffer 



DOWN 2 



# 




y> Input Stack 



:> 



IKJEBEMA 



• Validates the 
Subcommand 




LINK 



Invokes the Access Method 
to Read the Next Record of 
the Data Set. 



• Returns Control to 
IKJEBEMA. 



Records Before and After Processing 




R eg 1 | 



• Reads the Last Record in the 
Data Set to See if the Data 
Set is Empty. 



• Locates the Number of 
Records Specified by the 
Count Operand. 




Utility Data 
Set 



LEGEND 



SYMBOL MEANING 

Initial entry point 

Data flow 




L 



$ 



Control flow 



Pointer 



_ — ^. Data reference 



Method of Operation Diagram 8 . DOWN Subcommand 
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UTILWORK 



I 




Command Buffer 



FIND ' Men ' 



y> Input Stack 



^> 



IKJEBEMA 



• Validates the 
Subcommand. 




Records 


After 


Processing 
























IKJEBECA 






flHHHBB 








CACURNUM 






V, 






























f hme 


40 


50 


for All 


50 


60 


Good Men 


60 


70 


to Come 


h 



















R eg 1 j 



R egl | 



Parameter List 




UTILWORK 



LEGEND 




Record in Which 
Text Found. 



SYMBOL MEANING 

Initial entry point 



_y Data flow 



Control flow 



A Poin 



--► Data reference 



Method of Operation Diagram 9 . FIND Subcommand 
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Command Buffer 



Command Buffer 



I 



FORMAT . . 



7 




Input Stack 



IKJEBEMA 



Validates the 
Subcommand. 



Temporary 
Seq ue ntial 
Data Set 




SYMBOL MEANING 

Initial entry point 



Method of Operation Diagram 10. FORMAT Subcommand 



Method of Operation Diagrams 493 



Command Buffer 



IKJEBECA 



Command Buffer 



HELP 




} 



IKJEBEMA 



Validates the 
subcommand . 



IKJEBECA 



r 



CAPTIBFR 



Reg 1 



LINK 




IKJEBEHE 



Invokes the 
Command invoker 



HELP 



XCTL 



1 



Parameter List 





IKJEBECI 



Invokes the TSO 
HELP command 
processor. 

Returns control to 
IKJEBEMA. 



ATTACH 



Parameter List 




HELP TSO processor 



• When processing 
has completed 
returns control to 
IKJEBECI. 



LEGEND 



SYMBOL MEANING 

Initial entry point 



^> 



Data flow 



Control flow 



Pointer 
»» Data reference 



Method of Operation Diagram 1 1 . HELP Subcommand 
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Command Buffer 



INPUT * I 



I 




IKJEBEMA 



y • Validates the subcommand. 




LINK 



• Sets CAIMIR field in 

IKJEBECA to 1 to indicate 
insert operation is to be 
performed . 



• Invokes the Access Method 
to read specified records 



Reg 1 



^ ■ XCTL 




00050For all 
00060good men 

f 



IKJEBECA 



I 



UTILWORK 



Parameter List 



20 



Reg 1 



IKJEBEIM 



• If SCAN has been specified, 
invokes the appropriate 
syntax checker to validate 
records to be inserted. 

■^ • Invokes Access Method to 



write new records into data 
set. 

• Returns Control to 
IKJEBEMA. 



CALL 



Records before and 


after 


processing 




































IKJEBECA 




















Before 


CACURNUM 








♦ 40 --— 








20 


30 


Now is 


30 


40 


the time 


40 


50 


to come 


50 


60 


to the aid 


60 


70 


- 


























1NJCBCV.M 










After 


C 


.ACURNUM 




4 60 - 






20 


30 


Now is 


30 


40 


the time 


40 


50 


for all 


50 


60 


good men 


60 


70 


to come c 







• Reads each record in 
data set. 



Read 



Utility Data 
Set 



/ 



/ 



/ 



/ 



X 



IKJEBEUT 



• Writes a new record into 
the data set. 



/ 



<$' 



/ 



/ 



/ 



/ 



LEGEND 



SYMBOL MEANING 

Initial entry point 

Data flow 



C 



^ 



Control flow 



Pointer 



^- Data reference 



Method of Operation Diagram 12. INPUT Subcommand 
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Command Buffer 



INSERT 



Good Men ] 



I 




^ Inpuf Stack 



Records before and after processing. 



IKJEBECA 



Before 



CACURNUM 



)tinr 



20 



30 



for all 



30 



40 



3 



IKJEBEMA 



• Validates the 
subcommand . 



If control is returned to 
this module from IKJEBEIS 
because no operands are 
specified. 
IKJEBEMA invokes 
IKJEBEIP via a LINK 
macro instruction. 



(See Method of Operation 
Diagram for INPUT 
subcommand processor.) 



40 



50 



to the 



IKJEBECA 



After 



CACURNUM 



20 



30 



for all 



30 



31 



good men 



31 



40 



to come 



40 



50 



to the 



50 



IKJEBECA 



Command Buffer 



UTILWORK 




LEGEND 



SYMBOL MEANING 

Initial entry point 

I ~N Data flow 

Control flow 



Pointer 
— ^ Data reference 



Method of Operation Diagram 1 3 . INSERT Subcommand 



Method of Operation Diagrams 499 



Command Buffer 



Command Buffer 



IKJEBECA 





40 Good Men 



:> 



UTILWORK 



LINK 



Records Before and After Processing 






















hcjcbeca- 
















Before 


CACURNUM 




1 


^ 












HHH 


| Time 


20 


30 


for All 


30 


40 


Mood 
Gen 


40 


50 


to Come 


50 






















IKJEBECA 
















Attmt 


CACURNUM 




1 






1 Time 


20 


30 


for All 


30 


40 


Good Men 


40 


50 


to Come 


50 























Parameter List 


/ 


10 


*s 






Keg 1 






- 












» 



CALL 



• Invokes the Access 
Method to Delete 
the Specified 
Record . 



• Invokes the Line 
Edit Routine 
(IKJEBELE) to 
Tabulate and 
Convert Characters 
to Uppercase if 
Necessary. 



♦ 



IKJEBEUT 



• Finds the Record 
and Deletes it. 



Reg 1 





Parameter List 


/ 


01 




/ 


♦ 


/ 





CALL 



* 



• Invokes the Access 
Method to Write 
a New Record into 
the Data Set. 



Returns Control to 
IKJEBEMA. 



IKJEBELE 



• Line Edits the New 
Text to be Inserted 
in the Record. 



Parameter List 



Reg 1 



20 



♦ UTILWORK 



CALL 



IKJEBEUT 




H • Writes a New 
Record into the 
Data Set. 



LEGEND 




SYMBOL 


MEANING 
^b Initial entry point 

N Data flow 
J^k Control flow 


1 






t 


Pointer 
— •* Data reference 



Method of Operation Diagram 1 4 . Line Insert/Replace/Delete Subcommand 
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Command Buffer 



UTILWORK 



Command Buffer 



Reg 1 



LIST 20 50 




A 



IKJEBEMA 



• Validates the 
Subcommand. 



Records Before and Afte 


r Processing 






















tKJEBECA 
















Before 


CACURNUM 


; 


1 


• 


r^ 


10 


20 


the Time 


20 


30 


for All 


30 


40 


Good Men 


40 


50 


to Come ) 






IKIEBECA 
















After 


CACURNUM 




1 
















10 


20 


the Time 


20 


30 


for All 


30 


40 


Good Men 


40 


50 


to Come p 





LINK 



IKJEBECA 



CAPTIBFR 




IKJEBELT 



• Invokes the Access 
Method to Read 
Specified Records. 

• Formats Output Lines. 

• Uses IKJPUTLto 
Write Lines to the 
Terminal . 

• Returns Control to 
IKJEBEMA. 



Reg 



• Reads Records 
Specified by 
User. 



JKJEBECA 



CABFRPL 



Utility 
Data Set 



LEGEND 

SYMBOL MEANING 

Initial entry point 



i> 



Data flow 



Control flow 



A Poin 



inter 
- — -m> Data reference 



Method of Operation Diagram 15. LIST Subcommand 
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Command Buffer 



Command Buffer 



1 



MERGE 



User Terminal 



.J) Input Stack 



IKJEBEMA 



Validates the 
Subcommand. 




Invokes I KJEBEFC to 
Copy the Utility 
Data Set into the 
QSAM Data Set. 



Builds a Command 
Buffer in which it 
Sets Up a Model 
MERGE Command 
from Operands 
Entered by the User 



Passes Control to the 
System Command 
Invoker, IKJEBECI. 

Calls IKJEBEDA to 
Allocate the QSAM 
Data Set which Now 
Contains Output 
from the MERGE 
Command Processor. 

Calls IKJEBECO to 
Copy the QSAM Data 
Set into a New 
Utility Data Set. 

Returns Control to 
IKJEBEMA. 



Parameter List 



IKJEBECA 



Parameter List 



Reg 1 



Reg 1 



LINK 



IKJEBECI 



Passes Control to the 
System MERGE 
Command Processor 
Using the Model 
MERGE Command 
as Input. 



ATTACH 



MERGE TSO Processor 



• Returns Control to 
IKJEBECI when 
Processing has 
Completed. 



LEGEND 



SYMBOL MEANING 

Initial entry point 



Data flow 



^ 



Control flow 



T Pointer 
»» Data reference 



Method of Operation Diagram 16. MERGE Subcommand 
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IKJEBECA 



Command Buffer 



PROFILE 



1 




P Input Stack 



$ 



IKJEBEMA 



Validates the 
subcommand . 




LEGEND 



SYMBOL MEANING 

Initial entry point 



l£> Data flo 



Control flow- 



Pointer 



Method of Operation Diagram 17. PROFILE Subcommand 
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Command Buffer 



RENUM . . . r\ 
3T * 




Records before and after processing 



IKJEBECA 



Before 



CACURNUM 



30 



the time 



30 



40 



for all 



40 



41 



IKJEBECA 



After 



CACURNUM 



10 



20 



the tirr 



20 



30 



for all 



30 



40 



$ 



IKJEBEMA 



• Validates the 
subcommand. 



good 



good 






Reg 1 



LINK 



Command Buffer 



4KJEBECA 




CAPTIBFR 

czz 




RENUM .... 



t* 



IKJEBERE 



Invokes Access 
Method to read each 
record into storage. 



Renumbers the 
record returned by 
IKJEBEUT. 



Invokes Access 
Method to write each 
record from storage. 



For BASIC and IPLI 
invokes module to 
update polish data 
set. 



• For BASIC data 
sets, invokes the 
BASIC Renum 
module. 



• Invokes IKJEBEEX 
to close old utility 
data set. 

• Returns control to 
IKJEBEMA. 



LINK 



Reg 1 



04 4 UTILWORK 



IKJEBEUI 



I IKJEBESH BALR 



IKJEBEUT 



• Reads each record 
of the data set. 



Reg 1 



20 * UTILWORK 



IKJEBESH BALR 



IKJEBEUT 



Writes each updated 
record into the new 
utility data set. 



LINK 



IKJEBEMR 



• Updates the polish 
data set. 



LINK 



IKJEBERN 



• Renumbers data set. 



LINK 



IKJEBEEX 



• Closes and frees the 
old utility data set. 



Allocates a new 
utility data set. 



Reads 



Writes 



LINK 




Allocates 



Original Utility 
Data Set 



Renumbered 
Utility 
Data Set 



IKJEBEEX 



• Closes and frees 
the old utility 
data set. 



LEGEND 



SYMBOL MEANING 

Initial entry point 



Data flow 



£ 



Control flow 



li Pointer 

— „ — _ p^. [) a ta reference 



Method of Operation Diagram 18. RENUM Subcommand 
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Command Buffer 



Command Buffer 



RUN 



1 



Reg 1 




IKJEBEMA 



Validates the 
Subcommand. 



LINK 



LEGEND 



SYMBOL MEANING 

Initial entry point 



:> 



Data flow 



Control flow 



Pointer 

Data reference 



RUN 



1 



IKJEBECA 



IKJEBECA 




CAPTIBFR 



IKJEBERU 



• Invokes IKJEBEDA 
to Allocate a Data 
Set. 



Builds a Model 
Command for the 
TSO RUN Processor. 



Invokes the 

Final Copy Routine, 

IKJEBEFC. 



Invokes the 
Command Invoker 
Routine, IKJEBECI. 



• Invokes IKJEBEDA 
to Free Data Set. 



Returns Control to 
IKJEBEMA. 




Run Data Set 



• Invokes appropriate 
Invokes Appropriate 
Prompter for 
Compilers that do 
not Generate 
Object Data Sets. 



ATTACH 



TSO Prompter 



Method of Operation Diagram 1 9 . RUN Subcommand 



Method of Operation Diagrams 511 



Command Buffer 



Command Buffer 



SAVE Index B 



i 



I 



User Terminal 



_/ Input Stack 




O 



IKJEBEMA 



Validates the 
Subcommand. 



LINK 



SAVE Index B 



Invokes IKJDFLT to 
Fully-Qualify Data 
Set Name. 



« 



Invokes IKJDAIR to 
Allocate a New Data 
Set. 



Invokes the Final Copy 
Routine to Write the 
Utility Data Set into 
the Allocated Data Set 
(Now INDEX B). 



Returns Control to 
IKJEBEMA. 



LINK 



LINK 



LINK 



} 




INDEX A: 
Edit Data Set 



IKJDFLT 



• Quality Data Set 
Name Entered on 
Subcommand 



IKJDAIR 




Allocates a Data Set 
with a Disposition of 
Old, Keep or New, 
Catlg. 



IKJEBEFC 



Calls the Access 
Method to Read 
Records in the Data 
Set. 



Uses QSAM to Write 
Utility Data Set into 
the Allocated Data 
Set. 



LEGEND 






SYMBOL 




MEANING 
Initial entry point 

Data flow 
Control flow 

Pointer 

Data reference 






1 


^> 






t 


— 



Method of Operation Diagram 20, SAVE Subcommand 
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Command Buffer 



SCAN 



10 



40 




^> 



IKJEBEMA 



• Validates the 
subcommand. 




Reg 1 





IKJEBECA 



CAPTIBFR 




Command Buffer 



SCAN 



10 



40 



IKJEBESC 



Checks to see if the 
appropriate syntax 
checker is available 
to the user's system. 

Issues an XCTL macro 
to pass control to 
IKJEBESN, the 
second load module 
of the SCAN 
subcommand processor. 



XCTL 



IKJEBESN 



Checks if syntax checker 
has been loaded into 
storage; if not, loads and 
initializes appropriate 
checker. 

Invokes the Access 
Method to read records 
into storage. 



Calls the syntax 
checker. 

I nforms the user of any 
syntax error. 

Calls syntax checker for 
final entry; deletes the 
module when it is no 
longer needed. 

Returns control to 
IKJEBEMA. 



UTILWORK 




LEGEND 



CALL 



Syntax Checker 



Checks data records 
for valid syntax. 



SYMBOL 



^ 



MEANING 
Initial entry point 

Data flow 
Control flow 



Pointer 
•" ^ Data reference 



Method of Operation Diagram 21. SCAN Subcommand 
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Command Buffer 



Command Buffer 



I 



TABSET . . 

~~T~ 




User Terminal 



^ Input Stack 



IKJEBEMA 



Validates the 
subcommand 



IKJEBETA 



If numerical values 
are specified as 
operands, this module 
stores them in 
ascending order in 
the tabulation table 
(CATABS). 



Sets tabulation 
switch to X'FF'. 



Returns control to 
IKJEBEMA. 



IKJEBECA 



Checked by Line Edit Routine (IKJEBELE) which 
Translates Tabulation Values to Required Number 
of Blanks. 




LEGEND 



SYMBOL MEANING 

Initial entry point 



I '.J > Data flow 



Control flow 



Pointer 



„ ^ Q ata fe f erence 



Method of Operation Diagram 22. TABSET Subcommand 
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Command Buffer 



UTILWORK 



Command Buffer 



TOP 




IKJEBEMA 



Validates the 
Subcommand. 



Records Before and After Processing 



Reg 1 



LINK 



Before 


IKJEBECA 




























CACURNUM 










♦ 30 


















00 


Now Is 


00 


10 


the Time 


10 


20 


for All 


20 


30 


Good Men i|l 




















After 


IKJEBECA 


iiiii nil 














CACURNUM 


14 oo 




V 


% 






00 


Now Is 


00 


10 


the Time 


10 


20 


for All 


20 


30 

























IKJEBECA 



CAPTIBFR 

I 




TOP 



Reg 1 



IKJEBETO 



• Invokes the Access 
Method to Read the 
First Record. 

• Sets the Current Line 
Pointer to Zero. 

• Returns Control to 
IKJEBEMA. 



CALL 



Reg 1 



Parameter List 



04 




IKJEBEUT 



• Reads the First 
Record in the Data 
Set. 




UTILWORK 



00 | Now is 



Utility Data 
Set 



LEGEND 



SYMBOL MEANING 

Initial entry point 

I '. ' "., .' "" '".' /"~*"^~^ > Data flow 

Control flow 



Pointer 

Data reference 



Method of Operation Diagram 23. TOP Subcommand 
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Command Buffer 



Command Buffer 



UP 3 



1 




J Input Stack 



-v 



IKJEBEMA 



Validates the 
Subcommand. 



LINK 




Records Before and After Processing 



Before 

< 


ll^HlHil 


























CACURNUM 










il 












40 


50 


the Time 


50 


60 


for All 


60 


70 


Good Men 


70 


80 


- \ 


















After 


IKJE8ECA 


















\ CACURNUM 


) 


1 




\ 


40 


50 


the Time 


50 


60 


for All 


60 


70 


Good Men 


70 


80 


to Co....] 



















UP 3 



Reg 1 



Invokes Access 
Method to Find 
Records with Lower 
Keys. 



Returns Control 
to IKJEBEMA. 



CALL 



Reg 1 



7 



UTILWORK 



Parameter List 



02 



IKJEBEUT 



• Reads the First Record 
in the Data Set to 
See if the Data Set 
is Empty. 



Locates the Number 
of Records Specified 
by the Count 
Operand . 




UTILWORK 



Utility Data 
Set 



LEGEND 



SYMBOL 


MEANING 




^t Initial entry point 


| > Data flow 


■■■HHI^ Control flow 


t 


Pointer 


"~ 


— ► Data reference 



Method of Operation Diagram 24. UP Subcommand 
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Command Buffer 



Command Buffer 



I 



VERIFY 




User Terminal 



■*S Input Stack 



^> 



IKJEBEMA 



Validates the 
Subcommand 



LINK 



IKJEBEVE 



• Sets the verify 
switch to 1 . 



• Returns control to 
IKJEBEMA. 



IKJEBECA 



CAVRFYSW 



LEGEND 



/ 

/ 

Checked After the Operation of a Subcommand Processor is 
Completed. If the Operation has Resulted in a Change of 
Value of the Current Line Pointer, or a Change in the 
Current Line, and CAVRFYSW is Set to 1 , the Message 
Selection Routine (IKJEBEMS) Displays the Current Record 
and Line Number. 



SYMBOL MEANING 

Initial entry point 



c 



l£> Data flo 



* Control flo 



t Poin 



Data reference 



Method of Operation Diagram 25. VERIFY Subcommand 
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UTILWORK 



UTILWORK 



From IKJEBEINor 
IKJEBERE or 
IKJEBECO 



UTILDCB 



®- 



IKJEBEUI - Initialization 

Called During EDIT Initialization 
Phase to Obtain Work Area, 
Buffers, and Utility Data Set and 
Also Whenever a UDS is Required. 



'1 

"I 



IKJDAIR 



Allocates 
Utility 
Data Set. 



w 



"1 





UTILWORK 




IKJEBEAA 



Access 
Method 



W 



Reg 1 




Return to Caller 



Reg 15 

I Return Code 



IKJEBECA 



EDIT 

Communication 
Area 



I Obtains Work Area and Gets 
Storage for 4 Buffers. 



2 Obtains Utility 
Data Set. 



Places DDNAME into DCB 
and Opens Data Set. 



4" Establishes Chaining in 
Buffers and in Work Area. 



O Loads Utility Access 
Method Routines. 



RegO 




From 
IKJEBEEN 

or 
IKJEBERE 



UTILWORK 



UTILDCB 



Reg 1 



v IKJEBECA 




EDIT 

Communication 

Area 



|JKJEBEEX_- Final processing . 

| Called at Completion of Utility Access i 

Method Processing to Free Storage and . 

I Utility Data Set. I 



Buffers 

h 

I 

h 

l" - _V 

r " 

L 

I 



---1 
— 1 



■1 



i 



Y 



Frees Storage 
Used as Buffers. 



UTILWORK 



UTILDCB 




IKJDAIR 




IKJEBEAA 


Frees 
Utility 
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2 Closes the Utility 
Data Set. 



If EDIT END is Not in 
Process, Frees the Utility 
Data Set. 

If EDIT END is in Process, 
Leaves Utility Data Set 
Disposition to TMP. 



4 Deletes the Utility 
Access Method 
Routines. 



O Frees Storage Used as 
Work Area and Buffers. 



6 Restores All 
Registers. 
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Method of Operation Diagram 26. 



EDIT Access Method Initialization and 
Final Processing (IKJEBEUI and 
IKJEBEEX) 
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From Subcommand Processoi 



Called When Data is to be Read from, Written 
into, or Deleted from the Utility Data Set. 



Record to be Written 
into Data Set 
( In Ascending Order 
By Key ) 



Current Record, or 
Record with New Key 
to be Deleted 



Last Record of Data 
Set to be Read 



First Record of Data 
Set to be Read 




Edit -Communication Area 



Record Following 
Current Record, or 
Following Record 
with New Key to be 
Read 



Record Before 
Current Record, or 
Before Record with 
New Key to be 
Read 



Current Record, or 
Record with New 
Key to be Read 



Check 
Length of 
Key Field 



1 Checks the Option Code and Contents of 2nd and 3rd Words in the Parameter List to 
Determine the Operation (Read, Write, or Delete) to be Performed, the Record to 
be Manipulated, and, in the case of a Read Operation, the Place where the New 
Record is to Go. 

2 In the Case of a Write or a Delete Operation, the CADSMODS Field in the EDIT 
Communication Area (IKJEBECA) is Updated. 

3 Determines the Address of the Appropriate Routine. 

4 Passes Control (Call) to that Routine. 



For Line Numbered 
Record, Convert 
4-Byte Binary Key at 
Beginning of Record 
to EBCDIC 



UTILWORK 



VTABLE 



Find 

Write 

Address 



T 



Find 

Delete 

Address 




Access Method 



Write Operation 
(See MO Diagram 28) 

IKJEBEWR 




Delete Operation 

(See MO Diagram 30) 

IKJEBEDR 



Set Flag 
in EDIT 
Communi- 
cation 
Area 



Read Operation 

(See MO Diagram 29) 

IKJEBERR 



$ 



Reg 15 



Return Code 



For Read 
Operation, 
Pointer to 
Record to 
be Read 



Return to 
Caller 



Reg 1 



LEGEND 



SYMBOL MEANING 

Initial entry point 



^> Data 



flow 



Control flow 



-— »- Data reference 



Method of Operation Diagram 27. EDIT Access Method Interface (IKJEBEUT) 
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From IKJEBEUT 



Reg 1 



Parameter List 



UT1LWORK 



k Record to be 
Written into 
Data Set 



Called when a New Record 
is to be Placed in the 
Utility Data Set. 



IKJEBEWR 



Access Method Service Routines 
IKJEBELO 



Locates Records 
(See MO Diagram 31) 




IKJEBEAD 



IKJEBEWB 



IKJEBEMV 



IKJEBEDU 



(See MO 
Diagram 32) 



* 



Assign New 
Block 



(See MO 
Diagram 33) 



Write Out Data 
Block that Did 
Not Get New 
Record 



♦ 



♦ 



(See MO 
Diagram 35) 



♦ 



Move Record 
into Data Set 



Update 
Directory 




Return Code 



Return to 
Caller 



Reg 15 



LEGEND 



(See MO 
Diagram 34) 



IKJEBEDL 

wmmmmSvm 
mmmgmm 



IKJEBEAD 



IKJEBEWB 



IKJEBEMV 



IKJEBEDU 



1 Determines Whether Record to be Written is to Replace an Old Record with the Same KEY. 

2 If the Record to be Written is Not a Replacement, Writes the Record into the Data Set and 
Updates the Directory, if Necessary. If the Data Set is Empty or Full, Assigns a New Block 
Before Writing the Record. If the Directory Block is Full and Cannot Accept the KEY/TTR 
Associated with the Record, Writes Out Half of the Block's Contents. See Figure 20 on Block Splitting. 

3 If the Record is to Replace Old Record, Writes it into the Data Set. If the Record will Not 
Fit into Space of Old Record, Deletes Old Record Prior to Writing of New Record. 
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l£> Data flow 



Control flow 
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Method of Operation Diagram 28, 



EDIT Access Method Write Operation 
(IKJEBEWR) 
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From 
IKJEBEUT 



Called When a Record is to be 
Read from the Utility Data Set. 




05 


Read Last 
Record 


04 


Read First 
Record 


02 


Read Primekey 
+ 1 Record 


01 


Read Primekey 
- 1 Record 


00 


Read Primekey 
Record 




Locates Record Passes to 
Read Routine 

(See MO Diagram 31) 
IKJEBELO 



1 Saves the Current Reference KEY. 

2 Replaces the Current Reference KEY with the New KEY, if Present. 

3 Locates the Record Associated with the Value of the New KEY or the 
Current Reference KEY. This KEY Value can be Modified Depending 
Upon the Option Code Value. 

4 Restores PRIMEKEY to the Current Reference KEY Value if the Record 
Cannot be Located. 

O Moves the Record to a Specified Area. 



UTILWORK 




PRIMEKEY 




SAVEKEY 




Moves Record 



IKJEBEMV 



u 



Return Code 



Record 
Just Read 



Reg 15 



Return to 



^k Keturn 
^ Caller 



LEGEND 



SYMBOL MEANING 

Initial entry point 



^> 



Data flow 



Control flow 



Pointer 



--**■ Data reference 



Method of Operation Diagram 29. EDIT Access Method Read Operation 

(IKJEBERR) 
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From 
IKJEBEUT 



Called when a Record is 
to be Deleted from the 
Utility Data Set. 




Access Method Service Routines 



Locates Record 

(See MO Diagram 31) 

IKJEBELO 



1 Saves the Current Reference Key. 

2 Locates the Record Associated with the New KEY, if there is One, or with the Current Reference Key. 

3 Deletes Record with Same KEY Value as New KEY or Current Reference KEY. 

4 Restores PRIMEKEY to Value of Current Reference KEY if Record Associated with New KEY Cannot 
be Found. 



Deletes Record 



(See MO Diagram 32) 



IKJEBEDL 



Return 
Code 



Return to 
Caller 



Reg 15 



LEGEND 



SYMBOL MEANING 

Initial entry point 



^S Data flow 



Control flow 



Pointer 



■** Data reference 



Method of Operation Diagram 30. EDIT Access Method Delete Operation 

(IKJEBEDR) 
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From 

IKJEBEWR or 
IKJEBEDRor 
IKJEBERR 



Reg 1 




Not Used 
for Input 



UTILWORK 



PRIMEKEY 



Called to Find the Record 
Associated with a Particular 
KEY. 



Search Directory 
for Block Containing 
Desired Key ~~ 

(See MO Diagram 37) 
IKJEBEDS 



© 



Directory Block 1 




BUFREF 



TTR 



/ I 
Read in Referenced Block * I 

(See MO Diagram 38) 

IKJEBERB I 
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l_. 



Data Block 



KEY 



RECORD 
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, 1 
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RECORD 
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1 


KEY | RECORD 


1 





Nth DB 



First DB 



/ Last DB 



/ / / 

00 (Current) 01 (Current- 1 ) 02 (Current + 1 ) 

Possible Option Codes - 



/ 
04 (First) 



I 
05 (Last) 



1 Searches Directory Block for Data Block which Contains Desired Record. 

2 Reads the Data Block Containing the Desired Record into Storage. 

3 Searches the Data Block for the Desired Record. The Particular Record 
to be found may be the One Associated with the Current Reference KEY 
or One Associated with the Reference KEY as Modified by the Option 
Code. 

4 Updates PRIMEKEY to Value of KEY of Record Found. 




.J 



Data Block 




© 



Data Block 




Second Word, Points to 
Buffer Containing 
Correct Data Block 




Return to 
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W Call 



Return Code 
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Control flow 
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Method of Operation Diagram 31. EDIT Access Method Record Locate 

(IKJEBELO) 
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Reg 1 



From 

IKJEBEDR or 
IKJEBEWR 




Called to Delete a Particular 
Recor- . 




I Writes Out Block, if it is Empty. Searches Directory for Other Blocks Refering to the 
Key of the Record to be Deleted. If these Blocks are Empty, Writes them Out. If 
Block Found is Not Empty, Deletes Record by Moving Locators. 

2 Deletes Record by Moving Locators in Data Block. Updates NUMBER and RECVSP 
Fields. (DATASTRT Field Not Updated in this Example Since Deleted Record was 
Not First in Data Block.) 



Return to 
r Caller 



LEGEND 



SYMBOL MEANING 

Initial entry point 
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Data flow 



Control flo 
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Method of Operation Diagram 32. EDIT Access Method Record Delete 

(IKJEBEDL) 
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From 

IKJEBEWR or 
IKJEBEDU 



Reg 1 



Parameter List 



7^ 



Not Used for Input 



k UTILWORK 



DCBEBQX 




Called to Assign New Space in 
the Utility Data Set. 



Assign New Buffer 

(See MO Diagram 36) 

IKJEBEAS 



Yes 




«sx. 



Format Block 

(See MO Diagram 35) 

IKJEBEWB 



BUFSTATS 



-9 



A 



/ 



UTILWORK 



DCBEBQX 




Utility Data Set 



Read in Empty Block 

(See MO Diagram 38) 

IKJEBERB 



1 ( If there is Previously Assigned Space in the Utility Data Set, the DCBEBQX Field 
Points to the First Block in the Empty Block Chain.) 

2 Reads in the Empty Block Pointed to by DCBEBQX. Updates DCBEBQX to Point to 
the Next Empty Block in the Utility Data Set. 

3 Assigns a New Buffer and Updates the BUFSTATS Field, if the Empty Block Queue is Empty. 

4 Formats the New Block by Writing the Newly Assigned Buffer to the Utility Data Set. 
Waits on Completion of I/O. 



A. 



UTILWORK 



DCBEBQX 



Wait on I/O 

(See MO Diagram 39) 

IKJEBEWA 




Utility Data Set 









BUFTTR 








^^ Return to 
W Caller 



Return Code 



Reg 15 



LEGEND 



SYMBOL MEANING 

Initial entry point 



ZL> Data flow 



Control flow 



t Poin 



• — ** Data reference 



Method of Operation Diagram 33. EDIT Access Method TTR Assignment 

(IKJEBEAD) 
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Reg 1 




Parameter List 



4 UTILWORK 



KEY Value of New 
Block Entry 



TTR of New Block 
Entry 



Called When New Block 
KEY/TTR Combination 
Must be Added to 
Directory Block or When an 
Existing KEY/TTR Must be 
Modified. 



Searches Directory for Lowest- 
Level Occurance of Key 

(See MO Diagram 37) 

IKJEBEDS 



-© 




Yes \ 



>D 



Assigns a New Block 
(See MO Diagram 33) 
IKJEBEAD 




Finds the Next Higher 
Directory Block Level 

( See MO Diagram 38 ) 

IKJEBERB 




Writes Half of Old Block to 
New Assigned Block 

(See MO Diagram 35) 

IKJEBEWB 




Return to 
'Caller 



Old Block 



First 
Assigned Block 








; 






/V 


Old Block 




Second 
Assigned Block 


v\ 


^ 




»s vmmmmmm mm 


d> 





















Return Code 



Reg 15 



I Searches Directory Blocks for Lowest Level Occurrance of KEY/TTR Combination. 
Performs Required Update. 

2 If Directory Block is Not Full, Performs Update in Succeeding Higher-Level Directory 
Blocks, Including DSDB if Necessary. 

3 If Directory Block is Full, Assigns a New Block and Writes Half of Old Block Contents 
into New Block. Inserts New Block KEY/TTR Combination into Proper Block. 

(See Figure 20 on Block Splitting.) 

At If Directory Block that is Full is the DSDB, Assigns a Second Block and Writes 

Remaining Half of Old Block into New Block. Inserts One Index Entry for Each New 
Block (LLDB) into the New DSDB. (See Figure 20 On Block Splitting.) 



LEGEND 



SYMBOL MEANING 

Initial entry point 

Data flow 

Control flow 




Pointer 
^ Data reference 



Method of Operation Diagram 34, 



EDIT Access Method Directory Update 
(IKJEBEDU) 
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From IKJEBEWBor 
IKJEBEAD or 
IKJEBEASor 
IKJEBEDLor 
IKJEBEDUor 
IKJEBEWR 



Called to Write into the Utility 
Data Set a Particular Block. 




I Waits on I/O, if it is in Progress. 

2 Using the XDAP Write, Writes an Old Block from the 
Buffer into the Utility Data Set. 

3 Using the BSAM Write, Writes a New Block from the 
Buffer into the Utility Data Set. 



Set WAITB Flag On/Others Off 

Specified Buffer 




>• Block Written Out 



BUFSTATS 



Set WAITXW Flag On, Others Off 

Specified Buffer 




> Block Written Out 



BUFSTATS 



Set I/O Flag On UTILWORK 




DCBSTATS 



Return Code 



LEGEND 



Return to 
' Caller 



Reg 15 



SYMBOL MEANING 

Initial entry point 



~N Data flow 



Control flow 



A Poin 



Data reference 



Method of Operation Diagram 35. EDIT Access Method Write Block 

(IKJEBEWB) 
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T Previous Buffer 




Write out contents of 
first unreserved buffer. 

(See MO Diagram 35) 

IKJEBEWB 



J 



Wait on I/O request 

(See MO Diagram 39) 

IKJEBEWA 



.. ^D 



Called to Provide an I/O 
Buffer when a Buffer is 
Needed for Manipulation of 
the Ufility Data Set. 



1 Refers to the BUFSTATS Field to Find an Available Buffer. 

2 Writes Out the First Unreserved Buffer, if No Buffer is Free 
or Waiting on I/O. Waits for Completion of the Write 
Operation and Obtains the Buffer Address. 

3 If a Buffer is Waiting on I/O, Waits on Completion of the 
I/O. Obtains the Buffer Address. 



Obtain 

Buffer 

Address 



SetO 

Return 

Code 




















Assign 
Buffer 



Parameter List 



f UTILWORK 



Reg 1 



Return to 
Caller 



RETURN 
CODE 



Reg 15 



LEGEND 



SYMBOL MEANING 

Initial entry point 
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> Control flow 
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Method of Operation Diagram 36, 



EDIT Access Method Buffer Assignment 
(IKJEBEAS) 
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From IKJEBEDLor 
IKJEBEDU or 
IKJEBELO 



Reg 1 



Parameter List 



Option 
Code 



♦ Key Vali 



y Value 



UTILWORK 







DCBBUFAD 









Called to Find a Particular Data 
Block Which is Identified By a 
KEY and TTR Address. 



Data Block 



LLDB 



Buffer Information •[ 



UTILWORK 





Data Block 






t 






1 






1 
1 







4- 




Data Block 



I Searches the DSDB for the Desired KEY/TTR Combination. If there is a Lower-Level 
Directory Block, Reads it into Storage. 

2 Searches the LLDB for the Desired KEY/TTR. If there is a Lower Level of Directory 
Blocks the Appropriate Block is Read in. 

3 With the Lowest-Level of Directory Blocks Read in (These LLDBs Point to Data Blocks), 
the Directory Blocks are Searched for the Desired KEY/TTR Combination. 



LLDB 









BUFTTR 


BUFREF 
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TT 
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Return Code Reg 15 



LEGEND 



Buffer Information 




Return to 
Caller 



SYMBOL MEANING 

Initial entry point 



~f\ Data flow 



Control flow 



▲ Pointer 
-&■ Data reference 



Method of Operation Diagram 37. EDIT Access Method Directory Search 

(IKJEBEDS) 
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From IKJEBEAD or 
IKJEBEDLor 
IKJEBEDSor 
IKJEBEDUor 
IKJEBELO 



Reg 1 



Parameter List 



TTR of block to be 
read 



UTILWORK 



DCBBUFAD 



Called to Read into Storage a 
Particular Block, 



Wait on I/O request 

(See MO Diagram 39) 

IKJEBEWA 



j& 



Assign a Buffer 

(See MO Diagram 36) 

IKJEBEAS 









BUFTTR 







&-- 



I Waits on I/O, if it is in Progress. 

2 Reads the Desired Block into Storage, if the Block is in the 
Utility Data Set. Inserts a Pointer to the Block in the 
Second Word of the Output Parameter List. 

3 If the Block is Already in a Buffer, a Pointer to the Buffer 

is Inserted in the Second Word of the Output Parameter List. 




Convert TTR to actual 
track address 



(IECPCNUT) 



XDAP read 



I 




Wait on I/O request 

(See MO Diagram 39) 

IKJEBEWA 



UTILWORK 







DCBBUFAD - 
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Parameter List 
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Requested Block in Buffer 



~E 



Parameter List 



UTILWORK 



i Buffer Containing Block 



Reg 1 



Return to 
Caller 



Return Code Reg 15 



LEGEND 



SYMBOL MEANING 

Initial entry point 

I |)> Data flow 

Control flow 



t Poin 



^ Data reference 



Method of Operation Diagram 38. EDIT Access Method Read Block (IKJEBERB) 
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From IKJEBEAD or 
IKJEBEAS or 
IKJEBERBor 
IKJEBEWB 



Called to Wait On Completion of an I/O 
Operation in a Particular Buffer. 



UTILWORK 




1 Uses CHECK to Ensure Completion of a BSAM I/O Operation. 

2 If Not a BSAM Operation, Uses WAIT to Ensure Completion of 
XDAP I/O Operation. 

3 Inserts Error Information in TEMPAREA if an I/O Error has 
Occurred. 

4 If No I/O Error has Occurred, Turns Off Wait Flags in 
BUFSTATS Field of Buffer. 



BUFSTATS 



Return Code 



LEGEND 



Return to 
Caller 



Reg 15 



SYMBOL MEANING 

Initial entry point 



lT> Data flow 



Control flow 



Pointer 
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Method of Operation Diagram 39. EDIT Access Method Wait (IKJEBEWA) 
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